=head1 VERSION
-Version 1.17
+Version 1.19
=cut
-our $VERSION = '1.17';
+our $VERSION = '1.19';
=head1 DESCRIPTION
for my $path (@paths) {
next unless defined($path) and MM->maybe_command($path);
my $output = qx/$path --version/;
- $version = do {
+ my $ver = do {
local $@;
eval { Test::Valgrind::Version->new(command_output => $output) };
};
- if (defined $version) {
- next if defined $min_version and $version < $min_version;
+ if (defined $ver) {
+ next if defined $min_version and $ver < $min_version;
$valgrind = $path;
+ $version = $ver;
last;
}
}
=head1 COPYRIGHT & LICENSE
-Copyright 2009,2010,2011,2013,2015 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2013,2015,2016 Vincent Pit, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.