May I read all folder and subfolders for one directory, and yours files?

rdolinski has asked for the wisdom of the Perl Monks concerning the following question:

In this case, only may read folders and files for that directory

tie %diir, IO::Dir, "/GCN v 1.0/gcnnuevo";
foreach $item (keys %diir)
{
 print "-->".$item."=".$diir{$item}->size."bits";
}
[download]

But, I need read all folder and subfolders for one directory, and yours files, with few instructions. Maybe, reading directly FAT32 for Windows2000
for all
thanks
ok

Ricardo Dolinski Garrido

Edited: code tags - dvergin 2002-03-27

Comment on May I read all folder and subfolders for one directory, and yours files? Download Code

Replies are listed 'Best First'.
Re: May I read all folder and subfolders for one directory, and yours files? by Kanji (Parson) on Mar 27, 2002 at 20:54 UTC
Try File::Find instead, which will quite happily recurse through subdirectories for you. `use File::Find qw/ find /; find \&names_and_sizes => '/GCN v 1.0/gcnnuevo'; sub names_and_sizes { print $_, " ", -s; }` [download] --k.	[reply] [d/l]