| 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(:("([^"]+)"|(\w+))(:(.+))?)?$/) { } |
|
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'}) |
|
550
|
0 |
0 |
unless ($INC{'Mnet/Batch.pm'} and $MNet::Batch::fork_called) |
|
551
|
0 |
0 |
unless ($self->{'append'}) |
|
552
|
0 |
0 |
unless defined $row |
|
557
|
0 |
0 |
if ($headings_needed) |
|
567
|
0 |
0 |
if (defined $row) |
|
571
|
0 |
0 |
if ref $row->{$column} |
|
623
|
0 |
0 |
if ref $row->{$column} |
|
681
|
0 |
0 |
unless $INC{'JSON.pm'} or eval 'require JSON; 1' |
|
685
|
0 |
0 |
if ref $row->{$column} |
|
712
|
0 |
0 |
if ref $row->{$column} |
|
718
|
0 |
0 |
if length $column > $width |
|
723
|
0 |
0 |
if (defined $row) |
|
781
|
0 |
0 |
if ref $row->{$column} |
|
788
|
0 |
0 |
if (defined $row) |
|
824
|
0 |
0 |
if ref $row->{$column} |
|
830
|
0 |
0 |
if length $column > $width |
|
835
|
0 |
0 |
if (defined $row and $INC{'Mnet/Log.pm'}) { } |
|
|
0 |
0 |
elsif (defined $row) { } |
|
862
|
0 |
1 |
if $INC{'Mnet/Log.pm'} |
|
865
|
0 |
0 |
if ($self->{'_row_on_error'} and $Mnet::Report::Table::error) |
|
866
|
0 |
0 |
if (not $self->{'_row_on_error'} or $self->{'nodefer'}) |