t/author-critic.t

   1 #!perl
   2
   3 BEGIN {
   4   unless ($ENV{AUTHOR_TESTING}) {
   5     print qq{1..0 # SKIP these tests are for testing by the author\n};
   6     exit
   7   }
   8 }
   9
  10
  11 use strict;
  12 use warnings;
  13
  14 use Test::More;
  15 use English qw(-no_match_vars);
  16
  17 eval "use Test::Perl::Critic";
  18 plan skip_all => 'Test::Perl::Critic required to criticise code' if $@;
  19 Test::Perl::Critic->import( -profile => "perlcritic.rc" ) if -e "perlcritic.rc";
  20 all_critic_ok();