my $output = $args{command_output};
my $string;
if (defined $output) {
- ($string) = $output =~ /^valgrind-([0-9]+(?:\.[0-9]+)*)(?!\.)/;
+ ($string) = $output =~ /^valgrind-([0-9]+(?:\.[0-9]+)*)/;
} else {
$string = $args{string};
return $string if $string->$instanceof(__PACKAGE__);
- if (defined $string and $string =~ /^([0-9]+(?:\.[0-9]+)*)(?!\.)/) {
+ if (defined $string and $string =~ /^([0-9]+(?:\.[0-9]+)*)/) {
$string = $1;
} else {
$string = undef;