mirror of https://github.com/zulip/zulip.git
12 lines
223 B
Plaintext
12 lines
223 B
Plaintext
|
#!/usr/bin/perl
|
||
|
use strict;
|
||
|
use warnings;
|
||
|
|
||
|
while (<>) {
|
||
|
# remove milliseconds
|
||
|
s/(?<= \d\d:\d\d:\d\d)\.\d{3}//;
|
||
|
# convert session id to process id
|
||
|
s/\[[0-9a-zA-Z]+\.([0-9a-zA-Z]+)\]/"[" . hex($1) . "]"/e;
|
||
|
print;
|
||
|
}
|