| line |
true |
false |
branch |
|
72
|
1 |
321 |
unless defined $conf->{'fields'} |
|
74
|
1 |
320 |
unless ref $conf->{'fields'} eq 'ARRAY' |
|
81
|
313 |
6 |
if defined $conf->{'node_type'} |
|
82
|
311 |
8 |
if defined $conf->{'group'} |
|
92
|
316 |
3 |
if (defined $conf->{'data'}) |
|
96
|
139 |
177 |
if (defined $conf->{'data'}{'params'}) |
|
106
|
175 |
17 |
if (defined $value) |
|
127
|
280 |
36 |
if (defined $conf->{'data'}{'value'}) |
|
131
|
9 |
271 |
if ($self->is_type('q') or $self->is_type('quoted-printable')) |
|
140
|
1 |
279 |
if ($self->is_type('b') or $self->is_type('base64')) { } |
|
160
|
4 |
275 |
if (defined $self->{'node_type'} and $self->{'node_type'} eq 'ORG') { } |
|
|
274 |
1 |
elsif (@elements <= @{$self->{'field_order'};}) { } |
|
166
|
3 |
1 |
if scalar @unescaped > 0 |
|
224
|
1 |
3 |
if $val and ref $val eq 'ARRAY' |
|
225
|
3 |
1 |
if defined $self->{'unit'} |
|
247
|
1 |
39 |
unless defined $self->{'params'} |
|
250
|
44 |
12 |
if $value and $value eq 'type' |
|
252
|
1 |
38 |
wantarray ? : |
|
270
|
317 |
2798 |
if (defined $self->{'params'} and exists $self->{'params'}{lc $type}) |
|
304
|
13 |
26 |
if (defined $params and (defined $params->{'1'} and $params->{'1'} eq 'pref') or defined $params->{'pref'}) |
|
327
|
2 |
2 |
unless (defined $self->{'params'}) |
|
333
|
1 |
3 |
if (ref $type eq 'ARRAY') { } |
|
358
|
1 |
4 |
unless defined $self->{'params'} |
|
360
|
2 |
2 |
if (ref $type eq 'ARRAY') { } |
|
363
|
2 |
1 |
if (exists $self->{'params'}{lc $t}) |
|
370
|
1 |
1 |
if (exists $self->{'params'}{lc $type}) |
|
396
|
16 |
508 |
if (my $val = shift()) |
|
399
|
51 |
473 |
if defined $self->{'group'} |
|
419
|
13 |
1 |
if (defined $self->{$_}) { } |
|
420
|
0 |
13 |
if (ref $self->{$_} eq 'ARRAY') { } |
|
448
|
8 |
167 |
if $self->group |
|
450
|
82 |
93 |
if $self->_params |
|
469
|
0 |
0 |
if $self->{'encoding_out'} ne 'none' and not $self->{'encoding_out'} =~ /UTF-8/i and not $self->is_type('b') and not $self->is_type('base64') |
|
476
|
164 |
93 |
@params ? : |
|
499
|
1 |
355 |
if $self->is_type('b') or $self->is_type('base64') |
|
518
|
22 |
153 |
if $self->{'encoding_out'} eq 'none' |
|
524
|
22 |
153 |
if $self->{'encoding_out'} eq 'none' |
|
530
|
22 |
315 |
if $self->{'encoding_out'} eq 'none' |
|
536
|
0 |
0 |
if $self->{'encoding_out'} eq 'none' |
|
559
|
22 |
153 |
unless $self->{'encoding_out'} =~ /UTF-8/i |
|
561
|
10 |
143 |
if ($self->is_type('q') or $self->is_type('quoted-printable')) |
|
582
|
142 |
11 |
if &bytes::length(scalar $gcs->as_string) <= $max |
|
600
|
727 |
2113 |
if ($first_max and $bytes <= $first_max) |
|
606
|
2066 |
47 |
if ($bytes <= $max) |
|
619
|
11 |
36 |
if ($start + $len - 1 >= $gcs->length) |
|
650
|
10 |
165 |
if ($self->is_type('q') or $self->is_type('quoted-printable')) { } |
|
|
1 |
164 |
elsif ($self->is_type('b') or $self->is_type('base64')) { } |
|
697
|
13 |
355 |
unless defined(my $field_value = $self->{$field_name}) |
|
700
|
1 |
354 |
ref $field_value eq 'ARRAY' ? : |
|
730
|
1 |
317 |
unless defined $_[0]{'field_lookup'}{$name} |
|
732
|
39 |
278 |
if ($_[1]) |