From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

#!perl
BEGIN
{
use lib './lib';
use Test2::V0;
unless( $ENV{AUTHOR_TESTING} || $ENV{RELEASE_TESTING} )
{
plan(skip_all => 'These tests are for author or release candidate testing');
}
};
eval "use Test::Pod::Coverage 1.04; use Pod::Coverage::TrustPod;";
plan( skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" ) if( $@ );
my $params =
{
coverage_class => 'Pod::Coverage::TrustPod',
trustme => [qr/^(new|init|FREEZE|STORABLE_freeze|STORABLE_thaw|THAW|TO_JSON)$/] };
all_pod_coverage_ok( $params );