find . -name '*~' -atime +10 -print | perl -ne 'print;chop;unlink;' find . -name '*~' -atime +10 -print | perl -ne 'chop;unlink;'