80 Mio Zeilen einlesen - #168889 (Allgemeines zu Perl)

renee

2013-07-16 10:29

User since
2003-08-04
14371 Artikel
ModeratorIn

Ja, das ist möglich:

* Viel Speicher ;-)
* Möglichst wenige Daten im Speicher halten

Also besser:

Code: (dl )

open my $fh, '<', $datei;
while ( my $line = <$fh> ) {
    # mach was mit der Zeile
}

als

Code: (dl )

open my $fh, '<', $datei;
for my $line ( <$fh> ) {
    # mach was mit der Zeile
}

Ersteres geht zeilenweise durch die Datei, letzteres liest erst die gesamte Datei ein und iteriert dann über die Zeilen.

Edit: ggf. gibt es auch noch andere Lösungen für Dein Problem. Da Du aber die Problemstellung nicht nennst und wie die Datei aufgebaut ist, kann man dahingehend nicht weiterhelfen.
Last edited: 2013-07-16 10:30:52 +0200 (CEST)

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/