| Current Path : /usr/share/doc/perl-Test-Perl-Critic/xt/ |
| Current File : //usr/share/doc/perl-Test-Perl-Critic/xt/96_perlcritic.t |
use strict;
use warnings;
use File::Spec;
my $rcfile;
BEGIN {
$rcfile = File::Spec->catfile( qw< xt perlcriticrc > );
}
use Test::Perl::Critic -profile => $rcfile;
all_critic_ok();