$ find2perl /home/archive/logs/old -type f -mtime +7 -eval unlink >myfasterprog