Martin Barth wrote:
Hi Matt,
I did that, and then at the bottom of the script I tried looping through
just to verify that @files was populated - no dice.
<snip>
(($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) && -f _ &&
/^DATA.*\.zip\z/s && push @files, name;
What have I done wrong?
push @files, $name;
I strongly suggest that you enable strict and warnings for you perl
projects. That should help avoiding mistakes.
HTH Martin :-)
Oops, yup it was a typo in the email but good advice, I did turn them on.
Matt
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/