| line |
true |
false |
branch |
|
84
|
1 |
5 |
if (exists $ENV{'CAP_DEVPOPUP_EXEC'}) |
|
112
|
4 |
2 |
if ($param ne $params[0]) |
|
142
|
1 |
34 |
unless (exists $$self{'__rest_dispatch_table'}) |
|
167
|
4 |
51 |
$4 ? : |
|
171
|
7 |
133 |
if ($rule =~ m[/\* .* $]msx) |
|
177
|
33 |
107 |
if (my(@values) = $path =~ /^$rule$/msx) |
|
185
|
23 |
10 |
if (exists $$table{$method}) { } |
|
|
9 |
1 |
elsif (exists $$table{'*'}) { } |
|
202
|
2 |
30 |
unless (defined $preferred) |
|
206
|
3 |
27 |
if ($preferred eq '') |
|
212
|
2 |
28 |
if (ref $rm_name eq 'CODE') { } |
|
218
|
1 |
29 |
unless (defined $sub) |
|
228
|
14 |
15 |
if (@names) |
|
268
|
43 |
6 |
unless (exists $$self{'__rest_error_mode'}) |
|
273
|
43 |
6 |
if (defined $error_mode) |
|
328
|
16 |
37 |
unless (exists $$self{'__rest_params'}) |
|
333
|
48 |
5 |
if ($num_args) { } |
|
334
|
1 |
47 |
if (ref $args[0] eq 'HASH') { } |
|
|
14 |
33 |
elsif ($num_args % 2 == 0) { } |
|
|
32 |
1 |
elsif ($num_args == 1) { } |
|
343
|
26 |
6 |
if (exists $$self{'__rest_params'}{$args[0]}) |
|
354
|
4 |
1 |
wantarray ? : |
|
523
|
44 |
1 |
if ($num_args) { } |
|
524
|
3 |
41 |
if (ref $args[0] eq 'HASH') { } |
|
|
20 |
21 |
elsif ($num_args % 2 == 0) { } |
|
|
20 |
1 |
elsif ($num_args == 1) { } |
|
542
|
2 |
40 |
unless ($resource) |
|
546
|
20 |
20 |
unless ($prefix) |
|
550
|
20 |
20 |
unless ($id) |
|
583
|
21 |
22 |
if (exists $$args{'in_types'}) { } |
|
584
|
1 |
20 |
if (ref $$args{'in_types'} ne 'ARRAY') |
|
592
|
21 |
21 |
if (exists $$args{'out_types'}) { } |
|
593
|
1 |
20 |
if (ref $$args{'out_types'} ne 'ARRAY') |
|
762
|
44 |
38 |
unless (exists $$self{'__rest_dispatch_table'}) |
|
769
|
81 |
1 |
if ($num_routes) |
|
770
|
57 |
24 |
if (ref $routes[0] eq 'HASH') { } |
|
|
23 |
1 |
elsif ($num_routes % 2 == 0) { } |
|
795
|
231 |
54 |
if ($route_type eq 'HASH') { } |
|
|
17 |
37 |
elsif ($route_type eq 'CODE') { } |
|
|
36 |
1 |
elsif ($route_type eq '') { } |
|
813
|
454 |
1 |
if (scalar grep({$_ eq $req;} @request_methods)) { } |
|
830
|
314 |
140 |
if ($subroute_type eq 'HASH') { } |
|
|
17 |
123 |
elsif ($subroute_type eq 'CODE') { } |
|
|
122 |
1 |
elsif ($subroute_type eq '') { } |
|
879
|
34 |
107 |
unless (exists $$self{'__rest_route_prefix'}) |
|
884
|
1 |
140 |
if (defined $prefix) |