1use strict; 2use warnings; 3use Test::More tests => 2; 4use Module::Metadata; 5 6# This test case tests about parsing pod after `__END__` token. 7 8my $pm_info = Module::Metadata->new_from_file('t/lib/ENDPOD.pm', collect_pod => 1,); 9is( $pm_info->name, 'ENDPOD', 'found default package' ); 10is(join(',', $pm_info->pod_inside), 'NAME'); 11