4 unless ($ENV{AUTHOR_TESTING}) {
6 Test::More::plan(skip_all => 'these tests are for testing by the author');
15 use English qw(-no_match_vars);
17 eval "use Test::Perl::Critic";
18 plan skip_all => 'Test::Perl::Critic required to criticise code' if $@;