Algorithm-Gutter
view release on metacpan or search on metacpan
t/pod-coverage.t view on Meta::CPAN
67891011121314151617181920212223}
# Ensure a recent version of Test::Pod::Coverage
my
$min_tpc
= 1.08;
eval
"use Test::Pod::Coverage $min_tpc"
;
plan
skip_all
=>
"Test::Pod::Coverage $min_tpc required for testing POD coverage"
if
$@;
# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
# but older versions don't recognize some common documentation styles
my
$min_pc
= 0.18;
eval
"use Pod::Coverage $min_pc"
;
plan
skip_all
=>
"Pod::Coverage $min_pc required for testing POD coverage"
if
$@;
# skip Object::Pad DOES and META or similar
all_pod_coverage_ok( {
trustme
=> [
qr/^[A-Z]/
] });
( run in 0.571 second using v1.01-cache-2.11-cpan-95122f20152 )