Use Perl::Critic in test programs