--- convert-multilog-tai64nlocal 2023-06-27 09:13:00.306442324 +0200 +++ convert-multilog 2023-06-28 16:48:18.453729483 +0200 @@ -5,6 +5,10 @@ # # finds and coverts multilog-format log files to /var/log/___ # +# 2023-06-23 Roberto Puzzanghera +# compatibility with logs in human readable format such as +# 2023-06-28 16:17:26.012766509 tcpserver: status: 0/200/0 +# # 2005-04-11 jms1 - (no code changed.) changed the copyright notice to # specify that the license is the GPL VERSION 2 ONLY. i'm not comfortable # with the "or future versions" clause until i know what these "future @@ -166,12 +170,12 @@ sleep 2 ; } - for my $f ( glob "$d/log/main/\@*.[su]" ) + for my $f ( glob "$d/log/main/*.[su]" ) { debug "Reading $f\n" ; - open ( I , "tai64nlocal < $f |" ) - or die "Can\'t run tai64nlocal < $f: $!\n" ; + open ( I , "$f" ) + or die "Can\'t open $f: $!\n" ; while ( my $line = ) {