Correction to the script

    elsif (/success/) {
        if ($ms < $invoke{ms}) {
            $ms += 1000;
            $epoch -= 1;    
        }
        my $seconds = $epoch - $invoke{epoch};
        my $millisecs = $ms - $invoke{ms};
        printf "diff - secs: %2d ms: %3d\n", $seconds, $millisecs;
    }
[download]