| line |
true |
false |
branch |
|
124
|
0 |
23 |
if (defined $location and length $location and $res->code == 200) { }
|
|
161
|
2 |
23 |
if ($body) { }
|
|
168
|
1 |
22 |
if (my(%uploads) = %{$c->req->uploads;}) { }
|
|
|
10 |
12 |
elsif (%$body_params) { }
|
|
202
|
0 |
25 |
$c->can('user_exists') && $c->user_exists ? :
|
|
205
|
25 |
0 |
if $c->req->can("remote_user")
|
|
208
|
10 |
0 |
utf8::is_utf8($_) ? :
|
|
211
|
1 |
24 |
$username ? :
|
|
237
|
2 |
23 |
if ($saved_error)
|
|
238
|
0 |
2 |
if ref $saved_error
|
|
291
|
27 |
1 |
unless defined $pass_env
|
|
292
|
1 |
27 |
unless ref $pass_env
|
|
295
|
27 |
1 |
unless defined $kill_env
|
|
296
|
0 |
28 |
unless ref $kill_env
|
|
298
|
1 |
27 |
if (@$pass_env) { }
|
|
300
|
0 |
1 |
if (m[^/(.*)/\z]) { }
|
|
312
|
0 |
540 |
if ($k =~ m[^/(.*)/\z]) { }
|