Subject: | Invalid API Version Files |
1) Perl::APIReference::V5_015_001.pm : missing file?
2) Perl::APIReference::V5_015_005.pm : missing file?
3) Perl::APIReference::V5_016_001.pm:line4 : recursive inheritance
4) Perl::APIReference::V5_016_002.pm:line4 : recursive inheritance
Subject: | perlapi-assert-version.pl |
#!/usr/bin/perl
# perlapi-assert-version.pl
use strict;
use warnings;
use Perl::APIReference;
if (my $version = shift) {
Perl::APIReference->new( perl_version => $version );
}
else {
foreach (sort keys( %Perl::APIReference::Perls)) {
system "$0 $_" ;
printf STDERR "$_:%s\n", $? ? 'FAIL' : 'OK';
}
}
exit;