Здравейте, имам огромна молба - едно малко скриптче на
"Perl" или "Shell", при изпълнението на което да се изтриват
всички файлове в дадена директория, които са по-стари от
определена дата.
Предварително - много ви благодаря!!!
Zashto neprobvash taka...
Praish ls -lt ... i tiesh nared dokato ne matchnesh tvoqta
data na koqto returnvash....
Neshto ot sorta
#!/usr/bin/perl -w
use strict;
my $date = "Mar 14"; # Tva e otnositelno zashtoto zavisi i
ot lokala na sistemata....
foreach (`ls -lt`)
{
return if ($_ =~ m#$date#);
`rm -rf $_`;
}
#Ako iskash da ne ti trie direktorii mahash -rf-to....
# Tva e v nai obsht vid koeto se seshtam
Погледни тази статия
http://www.linux-bg.org/cgi-bin/y/index...
и по-скоро частта озаглавена: "Примери как може да
използвате cleaner.pl".
Надявам се да ти свърши работа. Успех