Help for this page
foreach my $file ( lsdir("/") ) {
foreach my $file ( lsdir($path) ) {
if (isdir("$path/$file"){ ... } else { ... }