in reply to Re: del files that is 7 days or older
in thread del files that is 7 days or older

Then simply turn it into a Perl program! 
$ find2perl /home/archive/logs/old -type f -mtime +7 -exec rm -fv {} \
+;  >myprog
$ chmod +x myprog
$ ./myprog

[download]
Of course, you can tweak it to use fewer resources with 
$ find2perl /home/archive/logs/old -type f -mtime +7 -eval unlink >myf
+asterprog

[download]

-- Randal L. Schwartz, Perl hacker

Replies are listed 'Best First'.
Re: Re: Re: del files that is 7 days or older
by mr.nick (Chaplain) on Feb 15, 2001 at 01:27 UTC
    On my Linux 2.2 box, find2perl much less efficient than find itself
    nicholas@neko/3:(pts-0.neko) ~/noding > /usr/bin/time x
0.10user 0.03system 0:00.15elapsed 85%CPU (0avgtext+0avgdata 0maxresid
+ent)k
0inputs+0outputs (356major+205minor)pagefaults 0swaps

nicholas@neko/3:(pts-0.neko) ~/noding > /usr/bin/time find /usr0/Downl
+oads -type f -mtime +180 -exec rm -fv {} \;  
0.00user 0.00system 0:00.01elapsed 0%CPU (0avgtext+0avgdata 0maxreside
+nt)k
0inputs+0outputs (96major+15minor)pagefaults 0swaps

    [download]
    (obviously "x" is the output from find2perl). The exact same set of examples, when run on Solaris 2.6 on an Ultrasparc produces similiar results.
[reply]
[d/l]
[reply]

In Section Seekers of Perl Wisdom