|
|
@@ -13,8 +13,8 @@ sub new
|
|
|
my $self = {
|
|
|
cfg => $args{cfg},
|
|
|
normalline => '(\d+):\d+:\d+ <([^>\s]+)>\s+(.*)',
|
|
|
- actionline => '(\d+):\d+:\d+ \*\s+(\S+) (.*)',
|
|
|
- thirdline => '(\d+):(\d+):\d+ .--\s+(\S+) (\S+) (\S+) (\S+) (\S+) (\S+) (.*)',
|
|
|
+ actionline => '(\d+):\d+:\d+ (\*){1,}\s+(\S+) (.*)',
|
|
|
+ thirdline => '(\d+):(\d+):\d+ .{1,}--\s+(\S+) (\S+) (\S+) (\S+) (\S+) (\S+) (.*)',
|
|
|
};
|
|
|
|
|
|
bless($self, $type);
|