Help for this page

Select Code to Download

Select or download this

opendir DIR, $path or die "can't read $path: $!";
@dirs = grep -d "$path/$_", readdir DIR;
closedir DIR;