Help for this page
Select Code to Download
Select
or
download this
use File::Find; find({ wanted => \&process, follow => 1 }, '.');