Help for this page
opendir(); readdir(); ... move("./path/$i", "/tmp/$i"); # if (-e "./path/$i"); } closedir DIR;
next unless(-f "./path/$i" || !grep{$_=~/$i/g}22..50);