line |
true |
false |
branch |
61
|
1 |
479 |
if (is_code_ref($fix)) { }
|
|
1 |
478 |
elsif (ref $fix and ref($fix) =~ /^IO::/) { }
|
|
1 |
477 |
elsif (is_glob_ref($fix)) { }
|
|
327 |
150 |
elsif (ref $fix) { }
|
|
150 |
0 |
elsif (is_string($fix)) { }
|
79
|
10 |
140 |
if ($fix =~ /[^\s]/ and not $fix =~ /\(/)
|
103
|
470 |
22 |
if (is_hash_ref($data))
|
105
|
9 |
457 |
if ref $d and $d == $reject
|
109
|
9 |
13 |
if (is_array_ref($data))
|
114
|
3 |
10 |
if (is_code_ref($data))
|
118
|
0 |
5 |
if ref $d and $d == $reject
|
124
|
9 |
1 |
if (is_instance($data) and is_able($data, "does") and $data->does("Catmandu::Iterable"))
|
129
|
23 |
0 |
if ref $_[0]
|
153
|
151 |
1 |
unless $self->preprocess or $self->_hogan_vars
|
225
|
859 |
11 |
if ($fix->can('emit')) { }
|
|
11 |
0 |
elsif ($fix->can('fix')) { }
|
323
|
6 |
2 |
if (@$keys) { }
|
336
|
6 |
6 |
unless @$keys
|
342
|
0 |
6 |
if ($key =~ /^[0-9]+$/) { }
|
|
0 |
6 |
elsif ($key eq '*') { }
|
363
|
0 |
6 |
if ($key eq '$first') { }
|
|
0 |
6 |
elsif ($key eq '$last') { }
|
390
|
0 |
0 |
unless @$keys
|
396
|
0 |
0 |
if ($key =~ /^[0-9]+$/) { }
|
|
0 |
0 |
elsif ($key eq '*') { }
|
420
|
0 |
0 |
if ($key eq '$first' or $key eq '$last' or $key eq '$prepend' or $key eq '$append') { }
|
427
|
0 |
0 |
if ($key eq '$first') { }
|
|
0 |
0 |
elsif ($key eq '$last') { }
|
|
0 |
0 |
elsif ($key eq '$prepend') { }
|
|
0 |
0 |
elsif ($key eq '$append') { }
|
465
|
0 |
0 |
unless defined $key
|
470
|
0 |
0 |
if ($key =~ /^[0-9]+$/) { }
|
|
0 |
0 |
elsif ($key eq '$first') { }
|
|
0 |
0 |
elsif ($key eq '$last') { }
|
|
0 |
0 |
elsif ($key eq '*') { }
|
506
|
0 |
0 |
unless defined $key
|
511
|
0 |
0 |
if ($key =~ /^[0-9]+$/) { }
|
|
0 |
0 |
elsif ($key eq '$first') { }
|
|
0 |
0 |
elsif ($key eq '$last') { }
|
|
0 |
0 |
elsif ($key eq '$prepend') { }
|
|
0 |
0 |
elsif ($key eq '$append') { }
|
|
0 |
0 |
elsif ($key eq '*') { }
|
560
|
0 |
0 |
if ($cb)
|
565
|
0 |
0 |
if ($key =~ /^[0-9]+$/) { }
|
|
0 |
0 |
elsif ($key eq '$first' or $key eq '$last' or $key eq '*') { }
|
567
|
0 |
0 |
if $cb
|
569
|
0 |
0 |
if $cb
|
572
|
0 |
0 |
if $cb
|
574
|
0 |
0 |
if $cb
|
578
|
0 |
0 |
if $cb
|
579
|
0 |
0 |
if $key eq "\$first"
|
580
|
0 |
0 |
if $key eq "\$last"
|
581
|
0 |
0 |
if $key eq "*"
|
582
|
0 |
0 |
if $cb
|
586
|
0 |
0 |
if $cb
|
588
|
0 |
0 |
if $cb
|
592
|
0 |
0 |
if ($cb)
|
604
|
2 |
6 |
if ($key =~ /^[0-9]+$/) { }
|
|
1 |
5 |
elsif ($key eq '$first') { }
|
|
1 |
4 |
elsif ($key eq '$last') { }
|
|
2 |
2 |
elsif ($key eq '*') { }
|
615
|
2 |
0 |
if $key > 0
|