CPAN-Meta
view release on metacpan or search on metacpan
t/data-test/META-1_3.yml
t/data-test/META-1_4.yml
t/data-test/META-2.json
t/data-test/META-2.meta
t/data-test/gpl-1_4.yml
t/data-test/preserve-release-status.yml
t/data-test/provides-version-missing.json
t/data-test/resources.yml
t/data-test/restricted-2.json
t/data-test/restrictive-1_4.yml
t/data-test/unicode.yml
t/data-test/version-not-normal.json
t/data-test/version-ranges-1_4.yml
t/data-test/version-ranges-2.json
t/data-test/x_deprecated-META.json
t/data-valid/1122575719-META.yml
t/data-valid/1206545041-META.yml
t/data-valid/1985684504-META.yml
t/data-valid/476602558-META.yml
t/data-valid/META-1_0.yml
t/data-valid/META-1_1.yml
t/converter.t view on Meta::CPAN
ok( $original, "loaded resources.yml" );
$original->{version} = version->new("1.64");
$original->{no_index}{file} = File::StringObject->new(".gitignore");
pass( "replaced some data fields with objects" );
my $cmc = CPAN::Meta::Converter->new( $original );
ok( my $converted = $cmc->convert( version => 2 ), "conversion successful" );
}
# specific test for UTF-8 handling
{
my $path = File::Spec->catfile('t','data-test','unicode.yml');
my $original = CPAN::Meta->load_file( $path )
or die "Couldn't load $path";
ok( $original, "unicode.yml" );
my @authors = $original->authors;
like( $authors[0], qr/Williåms/, "Unicode characters preserved in authors" );
}
# specific test for version ranges
{
my @prereq_keys = qw(
prereqs requires build_requires configure_requires
recommends conflicts
);
( run in 0.364 second using v1.01-cache-2.11-cpan-88abd93f124 )