1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
#!perl BEGIN { unless ($ENV{RELEASE_TESTING}) { require Test::More; Test::More::plan(skip_all => 'these tests are for release candidate testing'); }} use Test::More; eval "use Test::Pod 1.41";plan skip_all => "Test::Pod 1.41 required for testing POD" if $@; all_pod_files_ok();