Code-Optimierung: Textfile ändern
|
Seitenanfang |
| Hallo, ich hätte nur mal gern gewusst wie die richtigen Könner unter euch am einfachsten und schnellsten die z.b. 2. Zeile einer Textdatei z.b. test.txt ändern. Ich mach es bisher so:
open (TFILE,"<test.txt"); @data = <TFILE>; close (TFILE); $data[2] = "neu"; open (TFILE,">test.txt"); print TFILE @data; close (TFILE);
und das kommt mir doch reichlich plump vor *g*bin gespannt
Datum: 01.12.2004-08:46

|
re: Code-Optimierung: Textfile ändern
|
Seitenanfang |
mit Tie::File geht das besser:my $file = '/path/to/file'; tie my @array,'Tie::File',$file or die $!; $array[2] = "new"; untie @array;
Datum: 01.12.2004-13:00

|
re: Code-Optimierung: Textfile ändern
|
Seitenanfang |
| Hi das scheint eine tolle Sache zu sein, aber nur bei großen Dateien, oder? Kann man aus der Größe des Moduls darauf schließen, dass dies bei kleinen Dateien bedeutend langsamer ist als die jedoch längeren open... -Anweisungen?
Datum: 01.12.2004-16:01

|
re: Code-Optimierung: Textfile ändern
|
Seitenanfang |
| Hallo Ich habe da generell Sorgen.... Habt ihr wirklich nur normale Scripts im Sinn oder müssen wir hier mit Multi-User-Aktionen rechnen? Anders: Läuft es auf einem Webserver? Gruß Kristian
Datum: 02.12.2004-01:02

|
re: Code-Optimierung: Textfile ändern
|
Seitenanfang |
| Guten Morgen, es sollte laufen, das Modul gehört meistens zum StandardPerl..:)))
Datum: 02.12.2004-07:38

|