| line |
true |
false |
branch |
|
141
|
2 |
2 |
if (not $req) { } |
|
|
2 |
0 |
elsif (eval {
do {
local $SIG{'__DIE__'};
$req->can('param')
}
}) { } |
|
|
0 |
0 |
elsif (ref $req eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $req eq 'ARRAY') { } |
|
155
|
2 |
2 |
if ($type eq 'hash' or $type eq 'array') |
|
157
|
2 |
0 |
$type eq 'hash' ? : |
|
201
|
2 |
7 |
if @_ |
|
233
|
2 |
4 |
if @_ |
|
251
|
1 |
1 |
$_[0] ? : |
|
|
2 |
4 |
if @_ |
|
288
|
0 |
0 |
unless exists $$args{'method'} |
|
346
|
0 |
0 |
if (exists $$args{'value'}) { } |
|
351
|
0 |
0 |
if $$self{'params'} |
|
413
|
0 |
0 |
if (exists $$args{'value'}) { } |
|
418
|
0 |
0 |
if $$self{'params'} |
|
461
|
0 |
0 |
if (exists $$args{'checked'}) { } |
|
466
|
0 |
0 |
unless defined $value |
|
467
|
0 |
0 |
if $$self{'params'} |
|
474
|
0 |
0 |
if $checked |
|
530
|
0 |
0 |
if exists $$args{'escape_labels'} |
|
534
|
0 |
0 |
if (exists $$args{'checked'}) { } |
|
536
|
0 |
0 |
if ref $checked ne 'ARRAY' |
|
539
|
0 |
0 |
if (exists $$args{'default'}) |
|
541
|
0 |
0 |
if ref $checked ne 'ARRAY' |
|
543
|
0 |
0 |
if $$self{'params'} |
|
546
|
0 |
0 |
delete $$args{'linebreak'} ? : |
|
548
|
0 |
0 |
if (exists $$args{'values_as_labels'}) |
|
561
|
0 |
0 |
if ($val and ref $val eq 'HASH') |
|
574
|
0 |
0 |
unless exists $$hash{$value} |
|
582
|
0 |
0 |
if (exists $$labels{$value}) { } |
|
|
0 |
0 |
elsif ($v_as_l) { } |
|
584
|
0 |
0 |
if $escape_labels |
|
594
|
0 |
0 |
if wantarray |
|
666
|
0 |
0 |
if (exists $$args{'selected'}) { } |
|
671
|
0 |
0 |
if $$self{'params'} |
|
673
|
0 |
0 |
if (not defined $selected) { } |
|
|
0 |
0 |
elsif (ref $selected ne 'ARRAY') { } |
|
677
|
0 |
0 |
if (exists $$args{'values_as_labels'}) |
|
683
|
0 |
0 |
unless (my $option_key = $key) =~ s/\A-// |
|
695
|
0 |
0 |
if $multiple |
|
716
|
0 |
0 |
unless exists $$args{'type'} |
|
751
|
6 |
1 |
if (defined $_[0]) { } |
|
769
|
2 |
2 |
ref $_[0] ? : |
|
786
|
0 |
0 |
if (ref $value) { } |
|
789
|
0 |
0 |
ref $_group ? : |
|
790
|
0 |
0 |
if (delete $group{'disabled'}) |
|
806
|
0 |
0 |
if (ref $val) |
|
807
|
0 |
0 |
unless defined($val = $$val{$value}) |
|
814
|
0 |
0 |
if (exists $$labels{$value}) { } |
|
|
0 |
0 |
elsif ($v_as_l) { } |