Help for this page

Select Code to Download

Select or download this

my @array;
find(sub { push @array, $File::Find::name }, $dirphoto);