|
|
|
|
|
by gkfasdfasdf
2511 days ago
|
|
Here is the command I used (added linebreaks for clarity): rg '<filter pattern>' <logfile> | \
perl -MData::Dumper -n -e '
m/\d{2}:\d{2}:([\d.]+)/;
if ($last) {
$diff = $1 - $last;
print "$diff\n";
$hist{$diff} += 1;
}
$last = $1;
END {
$Data::Dumper::Sortkeys = true;
print Dumper(\%hist);
}
'
|
|