The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
#!/usr/bin/perl -w
use strict;

unless( eval { require Test::More; 1} ) {
    print "1..0 # SKIP Author test.\n";
    exit 0;
}

Test::More->import();

no warnings;

# NOTE: please do not blame me for suggetions from this test.  Do not set
# TEST_AUTHOR and then tell me about it.  Use test at your own risk.
if ($ENV{TEST_AUTHOR} ne "author972") {
    plan( skip_all => 'Author test.' );
}

eval "use Test::Pod 1.00";  ## no critic
plan( skip_all => "Test::Pod 1.00 required for testing POD" ) if $@;
all_pod_files_ok();