On Fri, 9 Apr 2004, Shachar Shemesh wrote:Suppose I wanted to write this myself, how would I go about doing it? Is there any way of recursively using a dir or file handle name?
1. I know, I write perl like a C programmer, I can't help it. Feel free
to show me how it's done.
Probably you should use File::Find Try this code as a starter:
use File::Find; $dirname = shift @ARGV; find(\&myfunc, $dirname);
Shachar
-- Shachar Shemesh Lingnu OpenSource Consulting http://www.lingnu.com/
================================================================= To unsubscribe, send mail to [EMAIL PROTECTED] with the word "unsubscribe" in the message body, e.g., run the command echo unsubscribe | mail [EMAIL PROTECTED]