5 eval "use Test::Pod::Coverage 1.04";
6 plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
8 # These are methods that need naming work
9 my @private_methods = qw(
10 render new min max resolve deltas
11 enter_scope exit_scope iterate_over_children
14 # These are method names that have been commented out, for now
18 my $private_regex = do {
20 qr/^(?:@private_methods)$/
23 all_pod_coverage_ok( {
24 also_private => [ $private_regex ],