| 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 |
|
663
|
0 |
0 |
if (exists $args->{'selected'}) { } |
|
668
|
0 |
0 |
if $self->{'params'} |
|
670
|
0 |
0 |
if (not defined $selected) { } |
|
|
0 |
0 |
elsif (ref $selected ne 'ARRAY') { } |
|
674
|
0 |
0 |
if (exists $args->{'values_as_labels'}) |
|
685
|
0 |
0 |
if $multiple |
|
706
|
0 |
0 |
unless exists $args->{'type'} |
|
741
|
6 |
1 |
if (defined $_[0]) { } |
|
759
|
2 |
2 |
ref $_[0] ? : |
|
776
|
0 |
0 |
if (ref $value) { } |
|
779
|
0 |
0 |
ref $_group ? : |
|
780
|
0 |
0 |
if (delete $group{'disabled'}) |
|
795
|
0 |
0 |
if $selected->{$value} |
|
797
|
0 |
0 |
if (exists $labels->{$value}) { } |
|
|
0 |
0 |
elsif ($v_as_l) { } |