t/perlcritic.t (7 lines of code) (raw):
#!/usr/bin/perl -T
# Wrapper around test until perlcritic fixes bug running under -T
# sa_t_init handles a number of necessary cross-platform initialization that is necessary
# even though this wrapper doesn't need most things that are also in there
use lib '.'; use lib 't';
use SATest; sa_t_init('perlcritic');
use strict;
use warnings;
-d "t" && "$^X t/perlcritic.pl" =~ /(.*)/ ||
"$^X perlcritic.pl" =~ /(.*)/;
exec($1);