X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fimportwwv.pl;h=8de9a271151bb98d258da74da804ff68ab6a57b8;hb=ed6790555f077eb521b8805113155a2ff99cc47e;hp=33b52f55f46a0957c433c45b0ded4ac6a5c2be1c;hpb=58e60cd8de9726b1b5a42574cbb79bc6a315d2c7;p=spider.git diff --git a/perl/importwwv.pl b/perl/importwwv.pl index 33b52f55..8de9a271 100755 --- a/perl/importwwv.pl +++ b/perl/importwwv.pl @@ -101,6 +101,7 @@ sub out my $fn = "solar.txt.$$"; open OUT, ">$tmp/$fn" or die "import $tmp/$fn $!"; + chmod 0666, "$tmp/$fn"; print OUT map { "$_\n" } @_; close OUT;