Thread Verzeichnis rekursiv löschen
(26 answers)
Opened by hcx at 2011-07-06 19:04
Allerdings muss dort $pfad nicht durch $ordner, sondern durch $datei ersetzt werden.
Ansonsten, funktioniert auch die Überprüfung, ob der Ordner leer ist (ab Zeile 38), so nicht richtig. Das sollte wohl eher heißen: Code (perl): (dl
)
1 2 3 opendir my $dir, $ordner or die "Cannot opendir '$ordner': $!\n"; my @test = grep { ! /\A\.\.?\z/ } readdir $dir; closedir $dir; MfG perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
|