#!/usr/bin/perl
BEGIN {
unless
(
$ENV
{AUTHOR_TESTING}) {
qq{1..0 # SKIP these tests are for testing by the author\n}
;
exit
}
}
use
strict;
use
warnings;
use
Test::More;
plan(
skip_all
=>
'Test::Perl::Critic required to criticise code'
)
if
$@;
Test::Perl::Critic->
import
(
-verbose
=> 9,
# verbose 6 will hide rule name
);
all_critic_ok();