X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fimportkeps.pl;h=3d66871c5893f6b41f8b396d3bf756b59d22b89b;hb=0c1082247c57a0ec2fa35a0a81af54b1e6ac2b89;hp=39fa21dfc3dae59467143fdb961bdfce2193e5ea;hpb=ee2b26cea53095199ebd04c4977ede501981af1c;p=spider.git diff --git a/perl/importkeps.pl b/perl/importkeps.pl index 39fa21df..3d66871c 100644 --- a/perl/importkeps.pl +++ b/perl/importkeps.pl @@ -50,6 +50,7 @@ sub process # open the output file in the data area my $fn = "$root/tmp/keps.txt.$$"; open OUT, ">$fn" or die "$fn $!"; + chmod 0666, $fn; print OUT $inp; close OUT;