Thread erweiterte split Funktion (4 answers)
Opened by robertri at 2010-11-09 09:51

robertri
 2010-11-09 09:51
#142551 #142551
User since
2010-11-09
2 Artikel
BenutzerIn
[default_avatar]
Hallo

Erstmals ein Hallo, da ich hier in diesem Forum neu bin.

Ich habe das Problem das ich von einer Applikation ein strukturiertes Logfile auswerten möchte und die einzelnen Felder in ein Array (mutli) hineinschieben will. Irgendwie funktioniert das split Kommando nicht und vielleicht kann mir jemand behilflich sein.

LogfileSample

EAER 287372 Event ist aufgetreten
ISHEN 938278 Problem mit Modul 1


Dies ist mein nicht funktionierendes Script
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!C:\\Programme\\Perl\\bin
open(FILE, "<xact2") or die "Kann File nicht oeffnen";
while(<FILE>) {
    chomp;
	next if ($_ =~ m/^\!/);
		($event, $id, $msg) = split(/^(\w+)\s+(\d+)\s+(.+)/g);
		push(@data, [$event, $id, $msg]);
		#push(@data, $_);
}
close(FILE);

for ($i=0; $i<=$#data; $i++)
{
	print "$i\n";
   print "0 = $data[$i][0], 1 = $data[$i][1], 2 = $data[$i][2], 3 = $data[$i][2]\n";
}


Ich möchte nun für jeden Zeileneintrag die drei Felder im Array befüllen
$event, $id, $msg

Vielen Dank für Eure Tipps
Robert
Last edited: 2010-11-09 09:54:42 +0100 (CET)

View full thread erweiterte split Funktion