I need to delete oldest modified file in a directory. I find this file with this:
my $oldest= printf "%s\n", (sort{ (-M $b) <=> (-M$a) } glob("v:\*"));
print $oldest;
unlink "$oldest";
What I get in response is:
oldest_filename
1
File is not deleted.
How would I do it?
?Ronen Kfir
System Administrator
?CIT div.
Tel Aviv University
Tel: 972-3-6407416
Fax: 972-3-6405158
cellular: 972-55-405910
E-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
