in reply to (1) line of sh vs (~20) lines of perl ?

While this is a perfect job for the shell, perl can still pull off a one liner
perl -MFile::Find::Rule -e 'unlink find(file => mtime => 86400 * 30,in => shift)' /backup
Well nearly one-line :)


update: dropped the for, as Aristotle rightly points out unlink can take a list

Replies are listed 'Best First'.
Re^2: (1) line of sh vs (~20) lines of perl ?
by Aristotle (Chancellor) on Nov 18, 2002 at 16:13 UTC
    You can leave the for off that. unlink takes more than one parameter at a time.

    Makeshifts last the longest.