X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fimportkeps.pl;h=3d66871c5893f6b41f8b396d3bf756b59d22b89b;hb=9d4c9fffafbce9bb7ab18299136c6e168a447c52;hp=39fa21dfc3dae59467143fdb961bdfce2193e5ea;hpb=0791dd94e297b6c14167f4252b91f06e84fbcf6f;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;