1use strict; 2use warnings; 3use Test::More; 4 5## no critic 6#use Perl::Critic; 7eval 'use Test::Perl::Critic 1.02'; 8plan skip_all => 'Test::Perl::Critic 1.02 required' if $@; 9 10# NOTE: New files will be tested automatically. 11 12# FIXME: Things should be removed (not added) to this list. 13# Temporarily skip any files that existed before adding the tests. 14# Eventually these should all be removed (once the files are cleaned up). 15my %skip = map { ( $_ => 1 ) } qw( 16); 17 18my @files = grep { !$skip{$_} } ( Perl::Critic::Utils::all_perl_files(qw( bin lib t )) ); 19 20foreach my $file (@files) { 21 critic_ok( $file, $file ); 22} 23 24done_testing(); 25