in reply to problem with Archive::Zip
It looks as though $renamed_file is not "a readable plain file or symbolic link".If the name given does not represent a readable plain file or symbolic + link, undef will be returned
Try wrapping your code with this check to be sure:
if ( ( -r $renamed_file )&& ( ( -f $renamed_file ) || ( -l $renamed_fi +le ) ) ){ #add to zip } else{ print "$renamed_file is not a readable valid file id\n" }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: problem with Archive::Zip
by fionbarr (Friar) on Aug 09, 2010 at 12:13 UTC |