line |
true |
false |
branch |
56
|
1 |
0 |
if (not $INC{'Mnet/Log.pm'}) |
58
|
1 |
10 |
unless (defined $Mnet::Report::Table::error) |
64
|
0 |
0 |
unless (defined $Mnet::Report::Table::error) |
147
|
0 |
11 |
if $INC{'Mnet/Batch.pm'} and Mnet::Batch::fork_called() |
152
|
1 |
10 |
unless $opts->{'columns'} |
153
|
1 |
9 |
if ref $opts->{'columns'} ne 'ARRAY' |
154
|
1 |
8 |
unless scalar @{$opts->{'columns'};} |
160
|
0 |
15 |
if $column =~ /["\r\n]/ |
164
|
4 |
11 |
if $type eq 'error' |
165
|
1 |
14 |
unless ($type =~ /^(epoch|error|integer|string|time)$/) |
212
|
0 |
0 |
if ($self->{'nodefer'}) { } |
245
|
0 |
6 |
if ($type eq 'epoch') { } |
|
3 |
3 |
elsif ($type eq 'error') { } |
|
2 |
1 |
elsif ($type eq 'integer') { } |
|
0 |
1 |
elsif ($type eq 'string') { } |
|
1 |
0 |
elsif ($type eq 'time') { } |
247
|
0 |
0 |
if $INC{'Mnet/Test.pm'} |
248
|
0 |
0 |
if exists $data->{$column} |
255
|
1 |
2 |
if exists $data->{$column} |
259
|
1 |
1 |
if (defined $value) |
261
|
0 |
1 |
if ($value =~ /^(\+|\-)?\d+$/) { } |
276
|
0 |
1 |
if $INC{'Mnet/Test.pm'} |
281
|
1 |
0 |
if exists $data->{$column} |
293
|
0 |
0 |
if exists $self->{'_column_types'}{$column} |
363
|
0 |
0 |
unless $self->{'_column_error'} |
420
|
0 |
5 |
if ($cli->{'test'}) { } |
421
|
0 |
0 |
if (defined $row) |
430
|
0 |
5 |
if (defined $row) |
436
|
4 |
1 |
if (not defined $self->{'output'}) { } |
|
0 |
1 |
elsif ($self->{'output'} =~ /^csv:(.+)/) { } |
|
0 |
1 |
elsif ($self->{'output'} =~ /^dump:([a-zA-Z]\w*):(.+)/) { } |
|
0 |
1 |
elsif ($self->{'output'} =~ /^json:([a-zA-Z]\w*):(.+)/) { } |
|
0 |
1 |
elsif ($self->{'output'} =~ /^sql:"?([^"]+)"?:(.+)/) { } |
474
|
0 |
4 |
if ($file and not $self->{'_output_fh'}) |
476
|
0 |
0 |
if $self->{'append'} |
478
|
0 |
0 |
unless open $self->{'_output_fh'}, $mode, $file |
485
|
0 |
4 |
if ($output) |
486
|
0 |
0 |
if ($row or not $self->{'append'}) |
549
|
0 |
0 |
unless ($INC{'Mnet/Batch.pm'} and $MNet::Batch::fork_called) |
550
|
0 |
0 |
unless ($self->{'append'}) |
551
|
0 |
0 |
unless defined $row |
556
|
0 |
0 |
if ($headings_needed) |
566
|
0 |
0 |
if (defined $row) |
570
|
0 |
0 |
if ref $row->{$column} |
620
|
0 |
0 |
if ref $row->{$column} |
675
|
0 |
0 |
unless $INC{'JSON.pm'} or eval 'require JSON; 1' |
679
|
0 |
0 |
if ref $row->{$column} |
706
|
0 |
0 |
if ref $row->{$column} |
712
|
0 |
0 |
if length $column > $width |
717
|
0 |
0 |
if (defined $row) |
771
|
0 |
0 |
if ref $row->{$column} |
778
|
0 |
0 |
if (defined $row) |
814
|
0 |
0 |
if ref $row->{$column} |
820
|
0 |
0 |
if length $column > $width |
825
|
0 |
0 |
if (defined $row and $INC{'Mnet/Log.pm'}) { } |
|
0 |
0 |
elsif (defined $row) { } |
852
|
0 |
1 |
if $INC{'Mnet/Log.pm'} |
855
|
0 |
0 |
if ($self->{'_row_on_error'} and $Mnet::Report::Table::error) |
856
|
0 |
0 |
if (not $self->{'_row_on_error'} or $self->{'nodefer'}) |