$ 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