| line |
true |
false |
branch |
|
23
|
0 |
0 |
unless my $tabledata = delete $args{'tabledata'} |
|
25
|
0 |
0 |
unless my $munge_column_names = delete $args{'munge_column_names'} |
|
28
|
0 |
0 |
unless $munge or $munge_hashref |
|
31
|
0 |
0 |
unless defined $_ |
|
32
|
0 |
0 |
unless (ref $_ eq "CODE") |
|
36
|
0 |
0 |
if $@ |
|
40
|
0 |
0 |
if keys %args |
|
66
|
0 |
0 |
if (wantarray) { } |
|
71
|
0 |
0 |
if $self->{'buffer'} |
|
73
|
0 |
0 |
unless $self->{'tabledata'}->has_next_item |
|
74
|
0 |
0 |
if ($self->{'munge'}) { } |
|
93
|
0 |
0 |
if $self->{'buffer'} |
|
95
|
0 |
0 |
$self->{'buffer'} ? : |
|
101
|
0 |
0 |
unless $self->{'buffer'} |