| line |
true |
false |
branch |
|
6
|
0 |
0 |
unless -r $_ |
|
16
|
0 |
0 |
$h1 <= $h2 ? : |
|
48
|
0 |
0 |
unless (isbetween(@_)) |
|
64
|
0 |
1 |
$ENV{'PERLXS'} eq 'PerlIS' ? : |
|
75
|
0 |
1 |
if (ref $_[0] eq 'HASH') { } |
|
79
|
0 |
1 |
if (@_ & 1) |
|
85
|
1 |
0 |
unless %default |
|
90
|
1 |
1 |
if ($_ eq 'NTLM' and $value) { } |
|
|
1 |
0 |
elsif (/^Basic$/i) { } |
|
|
0 |
0 |
elsif (/^Authent/i) { } |
|
|
0 |
0 |
elsif (/^msg$/i) { } |
|
|
0 |
0 |
elsif (/^head/) { } |
|
|
0 |
0 |
elsif (/^test$/i) { } |
|
94
|
0 |
1 |
if ($value and not $value =~ /_default/ || $value =~ /IP/) { } |
|
111
|
0 |
1 |
unless $authent |
|
113
|
0 |
1 |
if (ref $test eq 'CODE') { } |
|
|
1 |
0 |
elsif (not defined $test or $test =~ /^_default$/i) { } |
|
116
|
1 |
0 |
unless $ENV{'HTTP_HOST'} and not $ENV{'REMOTE_USER'} |
|
120
|
0 |
1 |
if (not $res) |