On Wednesday, Oct 22, 2003, at 15:25 US/Pacific, Vic Norton wrote: [..]
[..]my $headdir = "$ENV{HOME}/Perl/MyPerl/Virus/New Viruses/Headers"; # my $headdir = "$ENV{HOME}/Desktop";
open EXTRACTED, ">>$headdir/ extractedFiles" or die "cannot open extractedFiles: $!"; print EXTRACTED "Extracting head from somefile\n"; close EXTRACTED;
I modified your script to run with
my $headdir = "$ENV{HOME}/lib/some folder/Headers";
#my $headdir = "$ENV{HOME}/lib/bob/some folder/Headers";and then used the Finder to create the "some folder" and Headers
below that. And have been able to 'update' the " extractedFiles"
each time I ran it. I used the commented out line to point at
a directory that I knew did not exist. As expected it causes the
die line
[jeeves: 12:] ./test*
cannot open extractedFiles: No such file or directory at ./test.plx line 11.
[jeeves: 13:]
rather than updating the file: [jeeves: 14:] ls -ltr ; cat *ex* total 16 -rw-r--r-- 1 drieux house 90 Oct 22 16:40 extractedFiles -rwxr-xr-x 1 drieux house 496 Oct 22 16:41 test.plx Extracting head from somefile Extracting head from somefile Extracting head from somefile [jeeves: 15:]
I am running 10.2.8 and the default perl build. How are you checking that the the time stamp changes but the contect does not?
ciao drieux
---
