Parsing an Error Log

[ramyaamar]

if some one knows,how to parse a error log files and send the parsed date,error pattern to the Database..plz let me know!!

[docsnyder]

if some one knows,how to parse a error log files and send the parsed date,error pattern to the Database..plz let me know!!

How to parse depends on the format of your log file ...

Greetz, Doc

[Natti]

Heres a pseudocode


open inputFile for reading
open outputFile for writing
while (!EOF) {
look for regular expressions that you need in the inputFile
if pattern matches write line to the outputFile
}
close inputFile
close outputFile

[ramyaamar]

hii, how to write the perl program to parse a error log file for the websphere Application server?
for eg: if this s a error log file
[2/3/07 1:55:48:027 EST] 0000000a SystemErr R at com.ibm.ws.runtime.WsServerImpl.bootServerContaine r(WsServerImpl.java:182)
[2/3/07 1:55:48:028 EST] 0000000a SystemErr R at com.ibm.ws.runtime.WsServerImpl.start(WsServerImpl .java:120)

how the above lines should be parsed with the date,error codes and the error patterns.

[ramyaamar]

hii, i m new to perl.just now started learning,can u plz specify the regular expression for the files?
i have wrote to split the date,but apart from date some other number is shown...

$date = 16/Nov/2005:031415
$date =~ ([^:]*):.*
[^:]* will match 16/Nov/2005
it is not coming....

[docsnyder]

@ramyaamar

Just to give you an idea:

@lines = (
  "[2/3/07 1:55:48:027 EST] 0000000a SystemErr R at com.ibm.ws.runtime.WsServerImpl.bootServerContaine r(WsServerImpl.java:182)",
  "[2/3/07 1:55:48:028 EST] 0000000a SystemErr R at com.ibm.ws.runtime.WsServerImpl.start(WsServerImpl .java:120)",
);
 
for ( @lines ) {
  ($date, $time, $errNo, $errStr, $location) = $_ =~ m(^\[(\d+/\d+/\d+)\s+(.*)\]\s+([\da-z]+)\s+(.*)\s+at\s+(.*)$);
 
  printf("date: '$date', time: '$time', err no: '$errNo', err str: '$errStr', location: '$location'\n");
}

You should study regular expressions.

Greetz, Doc

[KevinADC]

best to learn all the perl basics including regexp, which is perls ace-in-the-hole, if learning is your goal. But you can also use CPAN if learning perl is not your objective but instead you need to get an application up and running before knowing perl very much. There are many modules already written for common tasks and for not so common tasks:

http://search.cpan.org/~mhamilton/Lo.../Log/Common.pm