Coerce PERL_VERSION with %vd to fix 5.8.

This commit is contained in:
Daniel Nichter
2012-08-08 15:23:52 -06:00
parent c755700068
commit ff7aebaa0e
2 changed files with 18 additions and 0 deletions

View File

@@ -46,6 +46,16 @@ sub test_v {
"$args{name} versions"
);
# Perl 5.8 $^V/$PERL_VERSION is borked, make sure
# the module is coping with it.
if ( $items->{Perl} ) {
like(
$versions->{Perl},
q/\d+\.\d+.\d+/,
"Perl version looks like a version"
);
}
return;
}