#!/usr/bin/perl -w
my $headdir = "$ENV{HOME}/Perl/MyPerl/Virus/New Viruses/Headers";
# my $headdir = "$ENV{HOME}/Desktop";
`mkdir -p "$headdir"` ;
open EXTRACTED, ">>$headdir/ extractedFiles"
or die "cannot open extractedFiles: $!";
print EXTRACTED "Extracting head from somefile\n";
close EXTRACTED;JD
At 6:25 pm -0400 22/10/03, Vic Norton wrote:
When I run the script, nothing is appended to " extractedFiles". The content of the file is unchanged. But its "Date modified" time has changed to the time when the script was run.
If I comment out the first "my $headdir" line and uncomment the second, the script works just as it should. Every time it is run another line is appended to the " extractedFiles" file on my desktop.
BTW, both " extractedFiles" files have the same permissions, "-rw-r--r--".
