소스 검색

fix timestamp, \d+ did only get one digit

Torbjorn Svensson 20 년 전
부모
커밋
4d6d94e556
1개의 변경된 파일3개의 추가작업 그리고 3개의 파일을 삭제
  1. 3 3
      modules/Pisg/Parser/Format/energymech.pm

+ 3 - 3
modules/Pisg/Parser/Format/energymech.pm

@@ -10,9 +10,9 @@ sub new
     my ($type, %args) = @_;
     my ($type, %args) = @_;
     my $self = {
     my $self = {
         cfg => $args{cfg},
         cfg => $args{cfg},
-        normalline => '^\[[^\]]*(\d+):\d+:\d+\] <([^>]+)> (.*)$',
-        actionline => '^\[[^\]]*(\d+):\d+:\d+\] \* (\S+) (.*)$',
-        thirdline  => '^\[[^\]]*(\d+):(\d+):\d+\] \*{3} (.+)$'
+        normalline => '^\[[^\]]*(\d{2}):\d+:\d+\] <([^>]+)> (.*)$',
+        actionline => '^\[[^\]]*(\d{2}):\d+:\d+\] \* (\S+) (.*)$',
+        thirdline  => '^\[[^\]]*(\d{2}):(\d+):\d+\] \*{3} (.+)$'
     };
     };
 
 
     bless($self, $type);
     bless($self, $type);