Help for this page

Select Code to Download

Select or download this

use File::Find qw();

...

File::Find::find(...);