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 :-)

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to