Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: problem with Archive::Zip

by Utilitarian (Vicar)
on Aug 09, 2010 at 12:06 UTC ( #853793=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    If the name given does not represent a readable plain file or symbolic
    + link, undef will be returned
    
  2. or download this
     
    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"
    }