Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
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??


in reply to problem with Archive::Zip

From Archive::Zip

If the name given does not represent a readable plain file or symbolic + link, undef will be returned
It looks as though $renamed_file is not "a readable plain file or symbolic link".

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" }
print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."


Comment on Re: problem with Archive::Zip
Select or Download Code
Re^2: problem with Archive::Zip
by fionbarr (Pilgrim) on Aug 09, 2010 at 12:13 UTC
    that was it EXACTLY...so simple but I wasn't seeing it. Thank you.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://853793]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2015-07-04 10:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (59 votes), past polls