Help for this page

Select Code to Download


  1. or download this
    perl -MFile::Find -e 'find(sub{ -f and do_something_with($File::Find::name)}, ".")'
  2. or download this
    perl -MFile::Find -e "find(sub{ -f and do_something_with($File::Find::name)}, '.')"