view release on metacpan or  search on metacpan

lib/Acme/AllThePerlIsAStage.pm  view on Meta::CPAN

if ( ${^GLOBAL_PHASE} eq 'RUN' ) {
    _say_stage("IF-RUN 2");
}

_say_stage("Global Scope 2");

1;

__END__

=encoding utf-8

=head1 NAME

Acme::AllThePerlIsAStage - Grok perl stages for scripts and modules under use and require–uncompiled and compiled

=head1 VERSION

This document describes Acme::AllThePerlIsAStage version 0.01

=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;