← Back to team overview

sslug-teknik team mailing list archive

Re: Automatisk sletning af gamle filer

 

On Tue, 2 Feb 1999 jakob@xxxxxxxxxxxx wrote:

> Jeg står lige og mangler en utility der kan kigge i et directory,
> se hvornår filerne deri er oprettet, og hvis de er oprettet f.eks.
> for mere end 2 timer siden, slette dem.
> 
> Der er et program der hedder tmpwatch der _næsten_ kan hvad jeg skal
> bruge. Desværre kigger det bare på atime, altså sidste access, og ikke
> ctime, tidspunktet for oprettelsen.
> 
> Er der nogen der kender til en tmpwatch alike, der kigger på ctime istedet
> for atime ?

Hvad med noget i retning af dette utestede sammenklamp (et par 
opslag i kamelbogen):

opendir DIR, "." or die...
@allfiles = readdir DIR;
closedir DIR;
foreach $f (@allfiles) {
  unlink $f if (-f $f and -C $f > $maxage);
}

Robin.

------------------------------------------------------------------------
 Robin G. Theander            E-mail: rgt@xxxxxxxxx, rtheande@xxxxxxx
 Bagsvaerd Hovedgade 99, 3A   Phone:  +45 4444 7775 
 DK-2880  Bagsvaerd           Mobil:  +45 4036 4538
 DENMARK                      Ham:    OZ1RGT
------------------------------------------------------------------------
I would have sent this mail yesterday but I was fresh out of stamps



References