perl -ne 'print if _____' `find .`