Thread foreach in array: Foreach in array Probleme Folgedurchlauf (7 answers)
Opened by nick_ch at 2006-10-30 17:31

nick_ch
 2006-10-30 17:31
#71258 #71258
User since
2006-10-30
2 articles
BenutzerIn
[default_avatar]
Das folgende Skript soll drei Logfiles von 120MB grösse einlesen. Der Erstdurchlauf dauert 1Minute, Folgedurchläufe bleiben bei @AnalyseLines=<READLOG>; rund 20 minuten hängen. Die Prozessorauslastung während dieser Zeit ist bei rund 98%. Kann mir da jemand weiterhelfen?
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#!/usr/bin/perl -w
#
use strict;

my $pathinput="D:\\WebLogs\\import\\";
my $filesinput="*.log";

my @filelist = glob($pathinput.$filesinput);
foreach my $AnalyseFile (@filelist) {
print $AnalyseFile , "\n";

open(READLOG,$AnalyseFile) || die("Cannot Open File");


my@AnalyseLines=<READLOG>; Code:
Original - my@AnalyseLines=<READLOG>; Code
my@AnalyseLines=<READLOG>;

my @AnalyseLines=<READLOG>;

close(READLOG);
}
\n\n

<!--EDIT|renee|1162225484-->

View full thread foreach in array: Foreach in array Probleme Folgedurchlauf