http://rt.cpan.org/Public/Bug/Display.html?id=49599 --- CGI.pm-3.47/t/fast.t +++ CGI.pm-3.47/t/fast.t @@ -7,16 +7,16 @@ $fcgi = $@ ? 0 : 1; } -use Test::More tests => 10; +use Test::More tests => 11; # Shut up "used only once" warnings. () = $CGI::Q; () = $CGI::Fast::Ext_Request; SKIP: { - skip( 'FCGI not installed, cannot continue', 7 ) unless $fcgi; + skip( 'FCGI not installed, cannot continue', 11 ) unless $fcgi; - use CGI::Fast; + use_ok( CGI::Fast ); ok( my $q = CGI::Fast->new(), 'created new CGI::Fast object' ); is( $q, $CGI::Q, 'checking to see if the object was stored properly' ); is( $q->param(), (), 'no params' );