in reply to Re: Beginners guide to File::Find
in thread Beginners guide to File::Find
You should end up with this subroutine:
sub wanted { my ($dev,$ino,$mode,$nlink,$uid,$gid); (($dev,$ino,$mode,$nlink,$uid,$gid) = lstat($_)) && -f _ && print("$name\n"); }
I replace the print("$name\n") with my code that performs an action on every file.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Beginners guide to File::Find
by Anonymous Monk on Dec 07, 2011 at 19:57 UTC | |
by jdporter (Paladin) on Dec 07, 2011 at 20:00 UTC |