find . -mtime +7 -print | perl -nle unlink