Help for this page
Select Code to Download
Select
or
download this
my @digit_dirs = grep /^\d+$/, <*>; print join( "\n", @digit_dirs, "" );