Thread Problem mit Perl Script, welches alte Backupverzeichnisse löschen soll (8 answers)
Opened by Dominik at 2013-08-29 15:34

GwenDragon
 2013-08-29 16:26
#169812 #169812
User since
2005-01-17
14748 Artikel
Admin1
[Homepage]
user image
In @entry stehen bestimmt mehre Einträge.

Ich tippe darauf, dass du statt
Code (perl): (dl )
1
2
3
4
5

foreach( my @entry = readdir DIR ){             
        if( ((stat(@entry))[9]+604800 <= $zeit) ){
                $ftp->rmdir(@entry, RECURSE);
        }
}

dies
Code (perl): (dl )
1
2
3
4
5

while( my $entry = readdir DIR ){               
        if( ((stat($entry))[9]+604800 <= $zeit) ){                      
                $ftp->rmdir($entry, RECURSE);
        }
}

wolltest.
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View full thread Problem mit Perl Script, welches alte Backupverzeichnisse löschen soll