diff --git a/dist.ini b/dist.ini index e6bc49e..6787ba8 100644 --- a/dist.ini +++ b/dist.ini @@ -6,8 +6,8 @@ copyright_holder = Chris Williams [@BINGOS] -[Prereq / BuildRequires] +[Prereqs / BuildRequires] Test::More = 0.47 -[Prereq] +[Prereqs] perl = v5.6.0 diff --git a/t/01-releases.t b/t/01-releases.t new file mode 100644 index 0000000..1682227 --- /dev/null +++ b/t/01-releases.t @@ -0,0 +1,31 @@ +use strict; +use warnings; +use Test::More qw[no_plan]; +use CPAN::Perl::Releases qw[perl_tarballs]; + +my $perl = '5.14.0'; + +my $expected = { + "tar.bz2" => "J/JE/JESSE/perl-5.14.0.tar.bz2", + "tar.gz" => "J/JE/JESSE/perl-5.14.0.tar.gz" +}; + +{ + my $got = perl_tarballs( $perl ); + is_deeply( $got, $expected, 'Imported function' ); +} + +{ + my $got = CPAN::Perl::Releases::perl_tarballs( $perl ); + is_deeply( $got, $expected, 'Package Function' ); +} + +{ + my $got = CPAN::Perl::Releases->perl_tarballs( $perl ); + is_deeply( $got, $expected, 'Class method' ); +} + +{ + my $got = perl_tarballs( '6.0.0' ); + ok( !$got, 'Should not have this release' ); +}