view release on metacpan or  search on metacpan

lib/Acme/ChuckNorris.pod  view on Meta::CPAN

=encoding utf8

=head1 NAME

Acme::ChuckNorris - Perl prefers to code in Chuck Norris

=head1 VERSION

This document describes Acme::ChuckNorris version 0.3

=head1 SYNOPSIS

t/pod-encoding.t  view on Meta::CPAN

plan skip_all => 'Test::Pod v1.14 required for testing POD' if $@;
eval 'use Pod::Simple';
plan skip_all => 'Pod::Simple v3.28 required for testing POD encoding' if $@;

for my $pod ( all_pod_files() ) {
    my $parser = Pod::Simple->new();
    $parser->parse_file($pod);
    next if !$parser->content_seen();

    my $enc = $parser->encoding();
    ok( defined $enc, "=encoding exists: $pod" ) && like( $enc, qr/^utf-?8$/i, "=encoding is utf8: $pod" );
}

done_testing;