use Test::More; use strict; use warnings; plan skip_all =>'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.' unless $ENV{TEST_AUTHOR}; eval "use Test::Pod::Coverage 1.04"; plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@; my $trustparents = { coverage_class => qw(Pod::Coverage::CountParents) }; all_pod_coverage_ok($trustparents);