Help for this page

Select Code to Download

Select or download this

use File::Find;

...
writefile();
print "complete\n";
<STDIN>;