123456 #!perl -Tuse Test::More;eval "use Test::Pod::Coverage 1.04";plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;all_pod_coverage_ok({ private => [ qr{^BUILD|DEMOLISH|AUTOMETHOD|START$}, qr{^_}, qr{^import$} ] });
#!perl -T
use
Test::More;
eval
"use Test::Pod::Coverage 1.04"
;
plan
skip_all
=>
"Test::Pod::Coverage 1.04 required for testing POD coverage"
if
$@;
all_pod_coverage_ok({
private
=> [
qr{^BUILD|DEMOLISH|AUTOMETHOD|START$}
,
qr{^_}
qr{^import$}
] });