Kann man mit Perl in einem Rutsch
alle Links in einem Verzeichnis entfernen?
Wenn ja, wie?
Gruss, Astrid
Mit einer Schleife über den Directory-Einträgen
und folgenden Funktionen:
perldoc -f -l
perldoc -f unlink
Grüße
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
> Kann man mit Perl in einem Rutsch
> alle Links in einem Verzeichnis entfernen?
> Wenn ja, wie?
opendir D,$Verzeichnis and unlink readdir D;
Aber VORSICHTIG:
Deine Definition von "Link" koennte der von meiner (UNIX) abweichen.
Kids, don't try this at home! :-)
--
Ullrich Horlacher Informationssysteme und Serverbetrieb
Rechenzentrum E-Mail: horl...@rus.uni-stuttgart.de
Universitaet Stuttgart Tel: ++49-711-685-65868
Allmandring 30 Fax: ++49-711-682357
70550 Stuttgart (Germany) WWW: http://www.rus.uni-stuttgart.de/
> Kann man mit Perl in einem Rutsch
> alle Links in einem Verzeichnis entfernen?
> Wenn ja, wie?
Na klar:
my $dir = "<gewünschtes Verzeichnis>";
system "find $dir -type l -exec rm '{}' \\;";
Unter der Annahme:
a) dass du Symbolic Links unter U*X meinst,
b) dass du weisst, was du tust.
Geht übrigens auch ohne Perl. ;-))
LG, Ferry
--
Ing Ferry Bolhar
Magistrat der Stadt Wien - MA 14
A-1010 Wien
E-Mail: ferdinand.bolh...@wien.gv.at