5 use ExtUtils::Manifest qw(maniread);
6 eval 'use Test::Pod 1.00';
7 plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
9 my $manifest = maniread();
10 my @pod = grep /\.(?:pm|pod)$/, keys %$manifest;
11 plan tests => scalar @pod;
12 pod_file_ok($_ => $_) for @pod;