1use strict;
2use warnings;
3
4use File::Spec;
5use English qw(-no_match_vars);
6
7use Test::More;
8
9eval {
10    require Test::Perl::Critic;
11};
12if ( $EVAL_ERROR ) {
13   my $msg = 'Test::Perl::Critic required to criticise code';
14   plan( skip_all => $msg );
15}
16
17my $rcfile = File::Spec->catfile( 't', 'author', 'perlcriticrc' );
18Test::Perl::Critic->import( -profile => $rcfile );
19all_critic_ok();
20