1#!perl -w 2 3use strict; 4use Test::More; 5eval "use Test::Pod::Coverage 1.04"; 6plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@; 7all_pod_coverage_ok( { also_private => [ qr/^constant$/ ] } ); 8