I am working on the book Wicked Cool Perl Scripts as a learning tool to hely me 
get from beginner to intermmediate perl. The second script of the book is 
giving me lots of
trouble. Notably the part below. I realize he creating a hash and is using the 
$File::Find::name object which may be a bit over my head. Can someone explain 
to me what he is doing?

my %files;      # Files indexed by size 

    # Go through the file tree and find all 
    # files with a similar size
    find( sub 
            -f &&  
            push @{$files{(stat(_))[7]}}, $File::Find::name
        }, @dir_list

BTW, am I sending this email to the correct place?
Derrick Cope

--from my mutt

To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org

Reply via email to