http://www.perlmonks.org?node_id=603987


in reply to How do I recursively process files through directories