#!perl -T
use Test::More;
eval "use Test::Pod::Coverage 1.08";
plan skip_all => "Test::Pod::Coverage 1.08 required for testing POD coverage"
if $@;
my @private;
for (qw(7bit 8bit binary)) {
push @private, "encode_$_", "decode_$_";
}
all_pod_coverage_ok({
coverage_class => 'Pod::Coverage::CountParents',
private => [ qw(codec identity), @private ],
trustme => [ qw(encode decode) ],
});