in reply to how to get the all the subdirectories path from the directory
Hi try this,
Update : If you want to find only the directories use this code:use File::Find; find(\&file_names, "/home/gube/"); sub file_names { print "$File::Find::name\n" if(-f $File::Find::name); }
Regards, Gube.use File::Find; find(\&dir_names, "/home/gube/"); sub dir_names { print "$File::Find::dir\n" if(-f $File::Find::dir,'/'); }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: how to get the all the subdirectories path from the directory
by mickeyn (Priest) on Mar 09, 2006 at 08:35 UTC | |
Re^2: how to get the all the subdirectories path from the directory
by radiantmatrix (Parson) on Mar 09, 2006 at 16:27 UTC |
In Section
Seekers of Perl Wisdom