Re^8: Creating a .zip file using perl

Eh, I tested that and it works correctly, are there any files ending in .lib in the directory you are interested in (are you looking to check subdirectories or something else that you haven't mentioned?)

print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."

Comment on Re^8: Creating a .zip file using perl Select or Download Code

Replies are listed 'Best First'.
Re^9: Creating a .zip file using perl by Anonymous Monk on May 05, 2011 at 09:07 UTC
I need to search recursively through subdirectories and then zip,not just in the current directory.Please help	[reply]
Re^10: Creating a .zip file using perl by Utilitarian (Vicar) on May 05, 2011 at 09:34 UTC
Beginners guide to File::Find provides examples of how to use File::Find to traverse a directory tree, simply put you need to add files to the zip if they match your criteria in the "wanted" function. You can use this rather than a direct directory read to provide you with your list of filenames to check. You'll have to work through spurperl's tutorial, but that way you'll have learned something from this exercise ;) `print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."`	[reply] [d/l]