Opened by Gast at 2007-10-24 10:27
Hallo,
ich wollte mit dem folgenden Code alle Dateien, die in einem Ordner liegen nacheinander öffnen, ein Leerzeichen in der ersten Zeile einfügen bzw. ersetzen und wieder (die gleiche Datei) schließen!
Kann mir jemand sagen, ob ich hier ein Fehler irgendwo habe, oder es überhaupt so funktioniert?
ich wollte mit dem folgenden Code alle Dateien, die in einem Ordner liegen nacheinander öffnen, ein Leerzeichen in der ersten Zeile einfügen bzw. ersetzen und wieder (die gleiche Datei) schließen!
Kann mir jemand sagen, ob ich hier ein Fehler irgendwo habe, oder es überhaupt so funktioniert?
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
opendir(DIR,"test");
while($datei = readdir(DIR))
{
open(INPUT,"<test/$datei");
print "$datei\n";
undef $/;
$_ = <INPUT>;
$_ =~ tr/<html><head>/ <html><head>/;
close (INPUT);
close(FILE);
}
closedir(DIR);