CPAN-DistnameInfo
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
use Test::More tests => 269;
use Data::Dumper;
use CPAN::DistnameInfo;
local $/ ="";
while(<DATA>) {
chomp;
my($file,%exp) = split(/[\t\n]+/, $_);
$exp{pathname} = $file;
my $d = CPAN::DistnameInfo->new($file);
my %got = $d->properties;
while (my($k, $v) = each %got) {
is($d->$k(), $v);
}
view all matches for this distributionview release on metacpan - search on metacpan
( run in 2.900 seconds using v1.00-cache-2.02-grep-82fe00e-cpan-d29e8ade9f55 )