You should be able to do it with
opendir (to open directories and browse the contents)
and
unlink (to delete files)
take a look at the man pages for those two to get you started, if
you're still struggling just ask again.
HTH
Nigel
>>> "NYIMI Jose (BMB)" <[EMAIL PROTECTED]> 07/29/02 08:37am >>>
Hello,
I would like to clean up my logfile directory by removing files that
are older than 7 days.
So I wrote something like:
/user/local/bin/perl -w
use strict;
use FindBin qw($Bin);
#
`find $Bin -mtime +7 -name '*.log' -exec rm {} \;`;
#
__END__
My question is: how can I use perl's synthax instead of unix command
"find" ?
Thus avoid using backsticks.
Thanks for your help.
José.
**** DISCLAIMER ****
"This e-mail and any attachment thereto may contain information which
is confidential and/or protected by intellectual property rights and are
intended for the sole use of the recipient(s) named above.
Any use of the information contained herein (including, but not limited
to, total or partial reproduction, communication or distribution in any
form) by other persons than the designated recipient(s) is prohibited.
If you have received this e-mail in error, please notify the sender
either by telephone or by e-mail and delete the material from any
computer".
Thank you for your cooperation.
For further information about Proximus mobile phone services please see
our website at http://www.proximus.be or refer to any Proximus agent.
ITM Business Solutions
Unit 4
Nine Trees Trading Estate
Morthen Road
Rotherham
S66 9JG
Reception
Tel: 01709 703288
Fax: 01709 701549
Help Desk
Tel:01709 530424
Fax: 01709 702159
CONFIDENTIALITY NOTICE: This message is intended only for the use of
the individual or entity to which it is addressed, and may contain
information that is privileged, confidential and exempt from disclosure
under applicable law.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
