Parent Directory | Revision Log | Patch
revision 20 by dpavlin, Fri Apr 17 10:04:02 2009 UTC | revision 21 by dpavlin, Sat May 2 21:07:32 2009 UTC | |
---|---|---|
# | Line 123 while(1) { | Line 123 while(1) { |
123 | my $level = $1 % 8; | my $level = $1 % 8; |
124 | my $facility = ( $1-$level ) / 8; | my $facility = ( $1-$level ) / 8; |
125 | ||
126 | $buf =~ s/^\w\w\w \d+ \d\d:\d\d:\d\d//; # strip timestamp which some syslog servers insert here | $buf =~ s/^\w\w\w\s+\d+\s+\d\d:\d\d:\d\d//; # strip timestamp which some syslog servers insert here |
127 | ||
128 | my ( $program, $pid ); | my ( $program, $pid ); |
129 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |