Condition Coverage

blib/lib/PAB3/CGI.pm
Criterion Covered Total %
condition 6 99 6.0


and 3 conditions

line !l l&&!r l&&r condition
44 2 0 0 exists $ENV{'MOD_PERL_API_VERSION'} and $ENV{'MOD_PERL_API_VERSION'} == 2
46 0 2 0 not $GLOBAL::MODPERL and exists $ENV{'MOD_PERL'}
2 0 0 not $GLOBAL::MODPERL and exists $ENV{'MOD_PERL'} and $Apache::VERSION > 1
2 0 0 not $GLOBAL::MODPERL and exists $ENV{'MOD_PERL'} and $Apache::VERSION > 1 and $Apache::VERSION < 1.99
48 2 0 0 exists $ENV{'GATEWAY_INTERFACE'} and $ENV{'GATEWAY_INTERFACE'} eq 'CGI-PerlEx'
2 0 0 exists $ENV{'CONTENT_TYPE'} and index(lc $ENV{'CONTENT_TYPE'}, 'multipart/form-data') >= 0
101 0 0 0 $_[0] and $pkg eq 'PAB3::CGI'
0 0 0 $_[0] and $pkg eq 'PAB3::CGI' and $_[0] eq 'import'
174 0 0 0 $ENV{'SCRIPT_FILENAME'} and $ENV{'SCRIPT_FILENAME'} =~ m[^(.+[\\/])(.+?)$]
333 0 0 0 defined $expire and $expire > 0
364 0 0 0 defined $params and ref $params eq 'HASH'
366 0 0 0 $location and index($location, '?') >= 0
380 0 0 0 $internal && $GLOBAL::MPREQ
423 0 0 0 $$ref_table{$r_hash} and $$ref_table{$r_hash} <= $level
432 0 0 0 $r and index($$r_hash{$k}, 'ARRAY(') >= 0
0 0 0 $r and index($$r_hash{$k}, 'HASH(') >= 0
458 0 0 0 $$ref_table{$r_array} and $$ref_table{$r_array} <= $level
468 0 0 0 $r and index($v, 'ARRAY(') >= 0
0 0 0 $r and index($v, 'HASH(') >= 0
488 0 0 0 $r and index($v, 'ARRAY(') >= 0
0 0 0 $r and index($v, 'HASH(') >= 0
0 0 0 $r and index($v, 'SCALAR(') >= 0

or 2 conditions

line l !l condition
415 0 0 $ref_table ||= []
449 0 0 $ref_table ||= {}
450 0 0 $level ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
159 0 0 0 $GLOBAL::MPREQ || $$
0 0 0 $GLOBAL::STATUS || ($GLOBAL::MPREQ ? $GLOBAL::MPREQ->status : 200)
251 0 0 0 $GLOBAL::MPREQ ||= 'Apache2::RequestUtil'->request
258 0 0 0 $GLOBAL::MPREQ ||= 'Apache'->request
269 0 0 0 $s->port || $s2->port
0 0 0 $c->remote_host || $c->remote_ip
329 0 0 0 $suffix =~ /\d{$len}|com|net|org/i or $domain =~ /^\./
403 0 0 0 not defined $_[1] or $_[1]
0 0 0 not defined $_[1] or $_[1] or not defined $PAB3::CGI::HEAD{$k}