-start-
>   Dan Jablonsky <[EMAIL PROTECTED]>
>at    06/11/2001 10:35 PM

>Hi all,
>I'm trying to come up with a simple perl script that
>would open a directory and would delete all files
>under a certain size. I played a while with ls and
>stat but I'm not going anywhere.
>I can't tell where the output of the stat command is
>going since I have all I need in that output. It would
>probably be easy to parse it and get the file size and
>then compare it to some number...
>Anybody any idea?

$ man find

$ find /my/dir -size -1000000c -print -exec rm {} \;

Grant Hopwood.
Valero Energy Corp.
(210)370-2380
PGP Public Key: Ldap://certserver.pgp.com
nuclear iraq bioweapon encryption cocaine korea terrorist
_______________________________________________
Perl-Unix-Users mailing list. To unsubscribe go to 
http://listserv.ActiveState.com/mailman/subscribe/perl-unix-users

Reply via email to