Opened by yasukatakaya at 2007-06-06 10:36
User since
2007-05-31
68 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2007-05-31
68 Artikel
BenutzerIn
Hallo Leute,
kann man mit Perl eine Datei öffnen, wenn in der Datei ein bestimmtes Wort nicht dabei ist, kann ich dann diese Datei löschen???
Ich grad versucht die Datei zu löschen, so klappt es:
doch wenn ich unlink nach dem open(.....); schreibe, löscht er die Datei nicht, heisst es, dass geöffnete Dateien nicht gelöscht werden können und somit auch nicht nach bestimmten Wörtern durchsucht werden können????
kann man mit Perl eine Datei öffnen, wenn in der Datei ein bestimmtes Wort nicht dabei ist, kann ich dann diese Datei löschen???
Ich grad versucht die Datei zu löschen, so klappt es:
Code: (dl
)
1
2
3
4
5
6
7
8
$quelle = $ARGV[0];
$x = $ARGV[0];
$x =~ s/(\w+)\.\w+/$1/;
$ziel = $x;
unlink ("$quelle");
open ($INPUT,"<$quelle") or die "konnte $ziel nicht oeffnen,$!\n";
doch wenn ich unlink nach dem open(.....); schreibe, löscht er die Datei nicht, heisst es, dass geöffnete Dateien nicht gelöscht werden können und somit auch nicht nach bestimmten Wörtern durchsucht werden können????