| line |
true |
false |
branch |
|
369
|
0 |
0 |
unless ($command) |
|
372
|
0 |
0 |
length $_ > $maxlen ? : |
|
378
|
0 |
0 |
unless $cbreaks->{$col_name}{$col} |
|
392
|
0 |
0 |
if ($val =~ /row/i) { } |
|
|
0 |
0 |
elsif ($val =~ /report/i) { } |
|
|
0 |
0 |
elsif ($val =~ /on/i) { } |
|
398
|
0 |
0 |
if (exists $cbreaks->{$val}) |
|
410
|
0 |
0 |
unless $action =~ /\bskip|\bpage|\bnodup|\bdup/i |
|
413
|
0 |
0 |
if ($action =~ /\bskip/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bnodup/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bdup/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bpage/i) { } |
|
415
|
0 |
0 |
if @words |
|
416
|
0 |
0 |
unless ($skip_val) |
|
423
|
0 |
0 |
if ($skip_val =~ /(\d+)/) { } |
|
426
|
0 |
0 |
if exists $cbreaks->{$val}{'skip_page'} |
|
430
|
0 |
0 |
if exists $cbreaks->{$val}{'skip'} |
|
436
|
0 |
0 |
unless exists $cbreaks->{$val}{'dup'} or exists $cbreaks->{$val}{'nodup'} |
|
441
|
0 |
0 |
if exists $cbreaks->{$val}{'dup'} |
|
445
|
0 |
0 |
if exists $cbreaks->{$val}{'nodup'} |
|
475
|
0 |
24 |
unless ($command) |
|
478
|
0 |
0 |
length $_ > $maxlen ? : |
|
493
|
24 |
0 |
if (my $c = $options->{$command}) |
|
495
|
24 |
0 |
if (my $c = $options->{$command}) |
|
497
|
0 |
24 |
if @cargs |
|
502
|
0 |
0 |
if /^$command/ |
|
504
|
0 |
0 |
if defined $sug |
|
505
|
0 |
0 |
unless defined $sug |
|
515
|
0 |
1 |
unless $command |
|
521
|
1 |
0 |
if (my $c = $options->{$command}) |
|
523
|
0 |
1 |
if @cargs |
|
527
|
0 |
0 |
if /^$command/ |
|
529
|
0 |
0 |
if defined $sug |
|
530
|
0 |
0 |
unless defined $sug |
|
554
|
11 |
42 |
unless ($command) |
|
557
|
13 |
2 |
length $_ > $maxlen ? : |
|
563
|
288 |
87 |
unless $column_format->{$col_name}{$col} |
|
571
|
6 |
36 |
if ($command =~ /clear/i) |
|
573
|
0 |
6 |
if (@args) { } |
|
600
|
3 |
33 |
unless (@args) |
|
602
|
2 |
1 |
unless exists $column_format->{$command} |
|
606
|
19 |
6 |
unless $column_format->{$command}{$col} |
|
622
|
8 |
25 |
unless (exists $column_format->{$command}) |
|
635
|
25 |
8 |
unless $col |
|
636
|
33 |
0 |
unless $col_head |
|
645
|
0 |
33 |
if $self->{'debug'} |
|
650
|
71 |
0 |
exists $options->{$argv} ? : |
|
653
|
71 |
0 |
if ($c) |
|
654
|
0 |
71 |
if ($c =~ /alias/i) { } |
|
|
0 |
71 |
elsif ($c =~ /clear/i) { } |
|
|
0 |
71 |
elsif ($c =~ /fold_after/i) { } |
|
|
0 |
71 |
elsif ($c =~ /fold_before/i) { } |
|
|
27 |
44 |
elsif ($c =~ /format/i) { } |
|
|
22 |
22 |
elsif ($c =~ /heading/i) { } |
|
|
17 |
5 |
elsif ($c =~ /justify/i) { } |
|
|
0 |
5 |
elsif ($c =~ /like/i) { } |
|
|
0 |
5 |
elsif ($c =~ /newline/i) { } |
|
|
0 |
5 |
elsif ($c =~ /new_value/i) { } |
|
|
2 |
3 |
elsif ($c =~ /noprint/i) { } |
|
|
2 |
1 |
elsif ($c =~ /print/i) { } |
|
|
0 |
1 |
elsif ($c =~ /null/i) { } |
|
|
0 |
1 |
elsif ($c =~ /on/i) { } |
|
|
1 |
0 |
elsif ($c =~ /off/i) { } |
|
|
0 |
0 |
elsif ($c =~ /truncated/i) { } |
|
|
0 |
0 |
elsif ($c =~ /wordwrapped/i) { } |
|
|
0 |
0 |
elsif ($c =~ /wrapped/i) { } |
|
660
|
0 |
0 |
if $self->{'debug'} |
|
681
|
0 |
27 |
unless $f |
|
692
|
0 |
22 |
if $self->{'debug'} |
|
700
|
3 |
14 |
if ($f =~ /(?:of(?:f)?)/) |
|
703
|
0 |
3 |
if $self->{'debug'} |
|
711
|
10 |
28 |
if ($f =~ /^($just)/i) |
|
718
|
4 |
10 |
unless $col->{$c} |
|
720
|
0 |
10 |
if $self->{'debug'} |
|
741
|
0 |
2 |
if $self->{'debug'} |
|
749
|
0 |
2 |
if $self->{'debug'} |
|
756
|
0 |
0 |
if $self->{'debug'} |
|
764
|
0 |
0 |
if $self->{'debug'} |
|
772
|
0 |
1 |
if $self->{'debug'} |
|
780
|
0 |
0 |
if $self->{'debug'} |
|
786
|
0 |
0 |
if $self->{'debug'} |
|
794
|
0 |
0 |
if $self->{'debug'} |
|
800
|
0 |
0 |
if $self->{'debug'} |
|
818
|
0 |
0 |
if exists $col->{'truncated'} and exists $col->{'wrapped'} and $col->{'truncated'} and $col->{'wrapped'} |
|
820
|
0 |
29 |
if defined $col->{'truncated'} |
|
821
|
0 |
29 |
if defined $col->{'wrapped'} |
|
823
|
10 |
19 |
if (defined $col->{'justify'}) |
|
824
|
2 |
8 |
if ($col->{'justify'} eq 'l') { } |
|
|
5 |
3 |
elsif ($col->{'justify'} eq 'r') { } |
|
|
3 |
0 |
elsif ($col->{'justify'} eq 'c') { } |
|
826
|
0 |
2 |
defined $col->{'wrapped'} ? : |
|
829
|
0 |
5 |
defined $col->{'wrapped'} ? : |
|
832
|
0 |
3 |
defined $col->{'wrapped'} ? : |
|
835
|
0 |
0 |
if $self->{'debug'} |
|
842
|
0 |
29 |
unless (defined $col->{'length'}) |
|
875
|
8 |
0 |
if (exists $$column_formats->{$column}) { } |
|
895
|
27 |
0 |
if ($format_requested =~ /a(\d+)/i) { } |
|
|
0 |
0 |
elsif ($format_requested =~ /^date$/) { } |
|
|
0 |
0 |
elsif ($format_requested =~ /(\d+)/) { } |
|
922
|
0 |
0 |
if $p1 |
|
923
|
0 |
0 |
if $s1 |
|
934
|
0 |
0 |
if ($format_requested =~ /\$/) |
|
940
|
0 |
0 |
if $format_requested =~ /B/i |
|
942
|
0 |
0 |
if $format_requested =~ /MI/i |
|
944
|
0 |
0 |
if $format_requested =~ /S/i |
|
946
|
0 |
0 |
if $format_requested =~ /PR/i |
|
948
|
0 |
0 |
if $format_requested =~ /D/i |
|
950
|
0 |
0 |
if $format_requested =~ /G/i |
|
952
|
0 |
0 |
if $format_requested =~ /C/i |
|
954
|
0 |
0 |
if $format_requested =~ /L/i |
|
956
|
0 |
0 |
if $format_requested =~ /\./ |
|
958
|
0 |
0 |
if $format_requested =~ /V/i |
|
960
|
0 |
0 |
if $format_requested =~ /EEEE/i |
|
963
|
0 |
0 |
if ($format_requested =~ /\,/) |
|
973
|
0 |
27 |
if $self->{'debug'} |
|
1142
|
0 |
0 |
$commify ? : |
|
1148
|
0 |
0 |
$commify ? : |
|
1154
|
0 |
0 |
$commify ? : |
|
1160
|
0 |
0 |
$commify ? : |
|
1167
|
0 |
0 |
$num > 0 ? : |
|
1168
|
0 |
0 |
$commify ? : |
|
1174
|
0 |
0 |
$num > 0 ? : |
|
|
0 |
0 |
$num > 0 ? : |
|
1178
|
0 |
0 |
$commify ? : |
|
1188
|
0 |
0 |
unless @_ |
|
1196
|
0 |
0 |
unless @_ |
|
1232
|
0 |
24 |
unless defined $command |
|
1235
|
21 |
3 |
if (@_) |
|
1237
|
6 |
15 |
if ($val =~ /off/i) { } |
|
1266
|
0 |
0 |
unless (ref $sth) |
|
1285
|
1 |
0 |
if $dbh->err |
|
1286
|
1 |
0 |
if $dbh->err |
|
1287
|
1 |
0 |
if $dbh->err |
|
1289
|
1 |
0 |
if defined $codes |
|
1315
|
0 |
0 |
if (@args) |
|
1322
|
0 |
0 |
unless (ref $sth) |
|
1352
|
0 |
0 |
unless defined $type |
|
1355
|
0 |
0 |
if (@args) { } |
|
1362
|
0 |
0 |
unless (ref $sth) |