Tie::File CR und LF - #181392 (Allgemeines zu Perl)

hlubenow

2015-06-21 16:47

User since
2009-02-22
875 Artikel
BenutzerIn
[default_avatar]

Bei 500 Zeilen ist das überhaupt kein Problem.

Jürgen
Bis zu welcher "Zeilenanzahl" kann ich den Konstrukt sinnvoll verwenden?

Ich würde sagen, wenn Du 1 GB freien RAM-Speicher hast, und eine Zeile 1.000 Zeichen hat, dann kannst Du das bis ca. 1 Mio. Zeilen machen.
Wenn eine Zeile nur 100 Zeichen hat, bis ca. 10 Mio. Zeilen, usw..
Dazu kommt, daß das Betriebssystem über Swap möglicherweise noch mehr verarbeiten könnte.

Alternativ kannst Du immer nur eine Zeile zur Zeit einlesen:

Code (perl): (dl )

#!/usr/bin/perl

use warnings;
use strict;

my $filename = "myfile";
open(my $fh, "<", $filename);
my $nr = 0;
while (my $l = <$fh>) {
    $nr++;
    chomp($l);
    print "$nr.\t$l\n";
}
close($fh);

Dann hast Du kein Problem mit dem Speicher.
Ich persönlich finde es aber meist bequemer, alles in ein Array zu lesen. Ist mir egal, was andere dazu sagen (ausgenommen Forenfreunde ;) ).
Last edited: 2015-06-21 17:00:03 +0200 (CEST)