add missing o (onetime pattern compilation)

This commit is contained in:
Peter Bieringer
2025-10-04 11:07:49 +02:00
parent dfa6e5dbb3
commit fbbd116caa

View File

@@ -75,7 +75,7 @@ while (defined($ThisLine = <STDIN>)) {
if ( $ThisLine =~ / \S+ response status for .* with depth '(\d)' in ([0-9.]+) seconds: (\d+)/o ) {
$req .= ":D=" . $1 . ":R=" . $3;
ResponseTimesMinMaxSum($req, $2) if ($Detail >= 10);
} elsif ( $ThisLine =~ / \S+ response status for .* in ([0-9.]+) seconds: (\d+)/ ) {
} elsif ( $ThisLine =~ / \S+ response status for .* in ([0-9.]+) seconds: (\d+)/o ) {
$req .= ":R=" . $2;
ResponseTimesMinMaxSum($req, $1) if ($Detail >= 10);
}