blob: d0a133aba18268706f401ab77efc7b92cafcf3f3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
use strict; BEGIN { $| = 1; $^W = 1; } my @MODULES = ( 'Perl::Critic 1.098', 'Test::Perl::Critic 1.01', );
use Test::More; unless ( $ENV{AUTOMATED_TESTING} or $ENV{RELEASE_TESTING} ) { plan( skip_all => "Author tests not required for installation" ); }
foreach my $MODULE ( @MODULES ) { eval "use $MODULE"; if ( $@ ) { $ENV{RELEASE_TESTING} ? die( "Failed to load required release-testing module $MODULE" ) : plan( skip_all => "$MODULE not available for testing" ); } } Test::Perl::Critic->import( -exclude => ['ProhibitSubroutinePrototypes']); all_critic_ok(); 1;
|