Seltsamer Effekt beim Dateieinlesen - #152664 (Allgemeines zu Perl)

marky

2011-09-26 11:25

User since
2003-08-15
215 Artikel
BenutzerIn

Hallo,

gerade habe ich ein sehr seltsames Verhalten erleben dürfen und zwar beim Einlesen einer 50MB-Datei kam es zu Out Of Memory Fehler per Shell, jetzt weis man als alter Hase, dass das oft auch mit Sonderzeichen zu tun hat und da die Daten über eine Schnittstelle automatisch befüllt werden, war das mein erster Gedanke, also habe ich das Einlesen der Datei auf Zeilenweise umgestellt, um zu gehen bei welcher Zeile das abbricht und jetzt wird es komisch, dann lief das ganze plötzlich durch, also der Code

Code: (dl )

open (DATL,"< file") ;
while ( my $l=<DATL> ) {
push ( @ll , $l ) ;
}close(DATL) ;

läuft ohne Probleme und der Code nicht

Code: (dl )

1
2
3

open (DATL,"< file") ;
my @ll = <DATL> ;
close(DATL) ;

gibt dafür eine Erklärung, ich hatte sogar das Gefühl, dass das der erste Code schnell war, das werde ich aber gleich mal messen.

Was für Montag morgen :-) Marky

PS: jetzt fall ich aber vom glauben ab, der push ist schneller
10 Wiederholungen mit 60MB grossen Textdatei.

Code: (dl )

1
2
3

      s/iter  rall rpush
rall    1.04    --  -22%
rpush  0.814   28%    --

modedit Editiert von GwenDragon: Code-Tags bei Ausgabe
Last edited: 2011-09-26 17:37:19 +0200 (CEST)

Mfg
Markus - http://www.perlunity.de -