in reply to How to Know how much old my file is

Just a quick one-liner:
$ perl -we ' print join " ", grep { -M > 7} glob ("*.pl"); > ' 1095341.pl a.pl add2.pl add_2.pl amazon.pl analyse_fable.pl ... while.pl X_oper.pl