| line |
true |
false |
branch |
|
41
|
261 |
121 |
$is_ordered ? : |
|
|
57 |
382 |
$formHandler ? : |
|
|
18 |
439 |
$pollHandler ? : |
|
57
|
121 |
336 |
if ($is_named) |
|
59
|
63 |
58 |
unless @{$arg{'params'};} |
|
62
|
101 |
356 |
if (exists $arg{'metadata'}) |
|
76
|
84 |
1278 |
if $hook |
|
100
|
0 |
149 |
if $self->pollHandler |
|
108
|
20 |
129 |
if ($self->formHandler) { } |
|
|
90 |
39 |
elsif ($self->is_ordered) { } |
|
121
|
0 |
24 |
$strict ? : |
|
|
24 |
15 |
defined $strict ? : |
|
128
|
43 |
106 |
if (my $meta = $self->metadata) |
|
131
|
32 |
11 |
if ($meta->{'len'}) { } |
|
141
|
0 |
7 |
$strict ? : |
|
|
7 |
4 |
defined $strict ? : |
|
166
|
22 |
48 |
if $attrs{'formHandler'} |
|
171
|
17 |
193 |
if $hook |
|
208
|
7 |
47 |
$self->pollHandler ? : |
|
274
|
37 |
29 |
unless $self->metadata |
|
293
|
0 |
63 |
unless $self->metadata |
|
321
|
2 |
11 |
if (defined(my $env_arg = $self->env_arg)) |
|
322
|
2 |
0 |
if defined $arg{'env'} |
|
325
|
11 |
2 |
wantarray ? : |
|
337
|
1 |
13 |
unless 'HASH' eq ref $arg |
|
368
|
10 |
17 |
if defined $upload |
|
370
|
10 |
17 |
if (defined(my $env_arg = $self->env_arg)) |
|
376
|
8 |
19 |
if ($meta_def and defined(my $meta_arg = $meta_def->{'arg'})) |
|
378
|
8 |
0 |
if defined $meta |
|
383
|
5 |
3 |
unless $meta_arg eq 'metadata' |
|
390
|
20 |
7 |
if (wantarray) { } |
|
391
|
9 |
11 |
unless $self->decode_params |
|
394
|
2 |
20 |
if (exists $data{$param}) |
|
397
|
2 |
0 |
if (defined $value) |
|
402
|
0 |
2 |
if $@ |
|
415
|
0 |
0 |
wantarray ? : |
|
432
|
1 |
27 |
unless 'HASH' eq ref $arg |
|
438
|
8 |
30 |
!exists $arg->{$_} ? : |
|
440
|
6 |
21 |
if @missing |
|
457
|
2 |
11 |
unless 'HASH' eq ref $meta |
|
464
|
2 |
3 |
!exists $meta->{$_} ? : |
|
466
|
2 |
9 |
if @missing |
|
489
|
10 |
17 |
unless defined $strict |
|
491
|
10 |
17 |
if ($strict) { } |
|
500
|
6 |
21 |
if (defined(my $env_arg = $self->env_arg)) |
|
506
|
10 |
17 |
if ($meta_def and defined(my $meta_arg = $meta_def->{'arg'})) |
|
508
|
10 |
0 |
if defined $meta |
|
511
|
20 |
7 |
wantarray ? : |
|
525
|
1 |
18 |
unless $meta_input |
|
530
|
9 |
9 |
unless defined $strict |
|
532
|
9 |
9 |
if ($strict) { } |
|
556
|
1 |
37 |
if $want_len > 0 and 'ARRAY' ne ref $input |
|
560
|
31 |
6 |
$want_len > 0 ? : |
|
562
|
4 |
33 |
unless $have_len >= $want_len |
|
578
|
1 |
15 |
unless 'ARRAY' eq ref $meta |
|
586
|
2 |
13 |
unless $have_len >= $want_len |
|
611
|
43 |
23 |
if (my $want_len = $self->len) |
|
619
|
30 |
36 |
if (defined(my $env_arg = $self->env_arg)) |
|
622
|
6 |
24 |
if $env_arg < 0 and -$env_arg > @actual_arg |
|
629
|
34 |
32 |
if ($meta_def and defined(my $meta_arg = $meta_def->{'arg'})) |
|
632
|
34 |
0 |
if (defined $meta) |
|
633
|
6 |
28 |
if $meta_arg < 0 and -$meta_arg > @actual_arg |
|
639
|
46 |
20 |
wantarray ? : |
|
653
|
0 |
44 |
unless $meta_input |
|
717
|
101 |
0 |
if ('HASH' eq ref $meta) |
|
720
|
66 |
35 |
if (defined(my $len = $meta->{'len'})) { } |
|
727
|
2 |
64 |
unless $len > 0 |
|
743
|
4 |
13 |
defined $meta->{'strict'} ? : |
|
|
18 |
17 |
!@$params ? : |
|
751
|
8 |
10 |
if not @$params and !defined($meta->{'strict'}) || $meta->{'strict'} |
|
781
|
50 |
49 |
if ($self->is_ordered) { } |
|
790
|
1 |
49 |
unless defined $meta_arg |
|
794
|
17 |
32 |
defined $meta_arg ? : |