X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Valgrind.git;a=blobdiff_plain;f=lib%2FTest%2FValgrind%2FVersion.pm;h=94661bb9e838d1e21bad43a1f9c35f90a5870197;hp=b2da36b9d83f4d13657bf3b3dc46f517855cfeb7;hb=f69f14a04c9b6c47bb1468e192977632cc1c854a;hpb=3f7326fc2135eb0c6c637e5676456b4ebf82d197

diff --git a/lib/Test/Valgrind/Version.pm b/lib/Test/Valgrind/Version.pm
index b2da36b..94661bb 100644
--- a/lib/Test/Valgrind/Version.pm
+++ b/lib/Test/Valgrind/Version.pm
@@ -65,11 +65,11 @@ sub new {
  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;