| line |
true |
false |
branch |
|
85
|
1 |
11 |
unless ($self->can("set_$function")) |
|
96
|
0 |
11 |
unless my $function = delete $o{'func'} |
|
104
|
1 |
10 |
unless ($req_spec) |
|
108
|
1 |
9 |
unless ($resp_spec) |
|
116
|
1 |
8 |
unless ($method) |
|
120
|
1 |
7 |
unless ($path) |
|
133
|
4 |
1 |
if (ref $setting eq 'HASH') { } |
|
135
|
0 |
4 |
unless $to_exchange = $setting->{'field_name'} |
|
147
|
2 |
3 |
unless (defined $value) |
|
148
|
1 |
1 |
if ($required) { } |
|
|
1 |
0 |
elsif ($default) { } |
|
152
|
0 |
1 |
if (ref $default eq 'CODE') { } |
|
163
|
3 |
1 |
if ($self->can($format)) |
|
167
|
1 |
3 |
if ($checker) |
|
170
|
0 |
1 |
unless my $code = $c->{'code'} |
|
173
|
0 |
1 |
unless my $err = $c->{'err'} |
|
177
|
1 |
0 |
unless (&$code()) |
|
183
|
3 |
0 |
if (defined $value or $include eq 'always') { } |
|
184
|
0 |
3 |
if (ref $value eq 'HASH') { } |
|
197
|
0 |
5 |
if (my $code = $events->{'keys'}) |
|
200
|
0 |
0 |
if (ref $code eq 'CODE') { } |
|
|
0 |
0 |
elsif (ref $code eq 'ARRAY') { } |
|
215
|
0 |
0 |
if (ref $setting eq 'HASH') { } |
|
228
|
2 |
3 |
if ($events->{'test_request_object'}) |
|
232
|
0 |
3 |
if ($events->{'test_response_object'}) |
|
236
|
2 |
1 |
ref $resp_spec eq 'ARRAY' ? : |
|
248
|
6 |
1 |
unless $row_spec->{'_others'} |
|
250
|
1 |
20 |
if $my_alias =~ /^_/ |
|
253
|
1 |
19 |
if ($self->can($attr_func)) |
|
261
|
0 |
2 |
if ($self->can($attr_func)) |
|
269
|
0 |
5 |
if (my $code = $resp_spec->{'raw_process'}) |
|
283
|
2 |
3 |
if (ref $resp eq 'ARRAY') { } |
|
287
|
0 |
4 |
if (my $filter = $resp_spec->{'row_filter'}) |
|
289
|
0 |
0 |
if ($action and not $action =~ /^(next|last)$/) |
|
292
|
0 |
0 |
if ($action eq 'next') { } |
|
|
0 |
0 |
elsif ($action eq 'last') { } |
|
302
|
0 |
2 |
if (my $sort = $resp_spec->{'sort'}) |
|
306
|
0 |
2 |
if (my $primary_key = $resp_spec->{'array2hash'}) { } |
|
|
0 |
2 |
elsif (my $pri_key = $resp_spec->{'array2[hash]'}) { } |
|
|
0 |
2 |
elsif (my $code = $resp_spec->{'post_row'}) { } |
|
308
|
0 |
0 |
if (my $code = $resp_spec->{'post_row'}) |
|
319
|
0 |
0 |
if (my $sort = $resp_spec->{'array2[hash.sort]'}) |
|
325
|
0 |
0 |
if (my $code = $resp_spec->{'post_row'}) |
|
334
|
2 |
0 |
if (my $sort = $resp_spec->{'sort_by'}) |
|
343
|
0 |
3 |
if (my $code = $resp_spec->{'post_row'}) |
|
351
|
1 |
2 |
wantarray ? : |
|
364
|
3 |
3 |
if ($way =~ /desc/) { } |
|
|
3 |
0 |
elsif ($way =~ /asc/) { } |
|
365
|
2 |
1 |
if ($way =~ /^n/) { } |
|
373
|
1 |
2 |
if ($way =~ /^n/) { } |
|
387
|
0 |
5 |
if ($ENV{'DEBUG'}) |
|
396
|
27 |
1 |
defined $default && length $default ? : |
|
402
|
30 |
8 |
unless $path =~ /\./ |
|
408
|
1 |
24 |
unless ($item) |
|
414
|
21 |
3 |
if (ref $data eq 'HASH') { } |
|
|
2 |
1 |
elsif (ref $data eq 'ARRAY') { } |
|
415
|
1 |
20 |
unless (exists $data->{$item}) |
|
421
|
1 |
1 |
unless (defined $data->[$item]) |