| line |
true |
false |
branch |
|
368
|
0 |
0 |
unless ($command) |
|
371
|
0 |
0 |
length $_ > $maxlen ? : |
|
377
|
0 |
0 |
unless $cbreaks->{$col_name}{$col} |
|
391
|
0 |
0 |
if ($val =~ /row/i) { } |
|
|
0 |
0 |
elsif ($val =~ /report/i) { } |
|
|
0 |
0 |
elsif ($val =~ /on/i) { } |
|
397
|
0 |
0 |
if (exists $cbreaks->{$val}) |
|
409
|
0 |
0 |
unless $action =~ /\bskip|\bpage|\bnodup|\bdup/i |
|
412
|
0 |
0 |
if ($action =~ /\bskip/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bnodup/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bdup/i) { } |
|
|
0 |
0 |
elsif ($action =~ /\bpage/i) { } |
|
414
|
0 |
0 |
if @words |
|
415
|
0 |
0 |
unless ($skip_val) |
|
422
|
0 |
0 |
if ($skip_val =~ /(\d+)/) { } |
|
425
|
0 |
0 |
if exists $cbreaks->{$val}{'skip_page'} |
|
429
|
0 |
0 |
if exists $cbreaks->{$val}{'skip'} |
|
435
|
0 |
0 |
unless exists $cbreaks->{$val}{'dup'} or exists $cbreaks->{$val}{'nodup'} |
|
440
|
0 |
0 |
if exists $cbreaks->{$val}{'dup'} |
|
444
|
0 |
0 |
if exists $cbreaks->{$val}{'nodup'} |
|
474
|
0 |
24 |
unless ($command) |
|
477
|
0 |
0 |
length $_ > $maxlen ? : |
|
492
|
24 |
0 |
if (my $c = $options->{$command}) |
|
494
|
24 |
0 |
if (my $c = $options->{$command}) |
|
496
|
0 |
24 |
if @cargs |
|
501
|
0 |
0 |
if /^$command/ |
|
503
|
0 |
0 |
if defined $sug |
|
504
|
0 |
0 |
unless defined $sug |
|
514
|
0 |
1 |
unless $command |
|
520
|
1 |
0 |
if (my $c = $options->{$command}) |
|
522
|
0 |
1 |
if @cargs |
|
526
|
0 |
0 |
if /^$command/ |
|
528
|
0 |
0 |
if defined $sug |
|
529
|
0 |
0 |
unless defined $sug |
|
553
|
11 |
42 |
unless ($command) |
|
556
|
11 |
4 |
length $_ > $maxlen ? : |
|
562
|
288 |
87 |
unless $column_format->{$col_name}{$col} |
|
570
|
6 |
36 |
if ($command =~ /clear/i) |
|
572
|
0 |
6 |
if (@args) { } |
|
599
|
3 |
33 |
unless (@args) |
|
601
|
2 |
1 |
unless exists $column_format->{$command} |
|
605
|
19 |
6 |
unless $column_format->{$command}{$col} |
|
621
|
8 |
25 |
unless (exists $column_format->{$command}) |
|
634
|
25 |
8 |
unless $col |
|
635
|
33 |
0 |
unless $col_head |
|
644
|
0 |
33 |
if $self->{'debug'} |
|
649
|
71 |
0 |
exists $options->{$argv} ? : |
|
652
|
71 |
0 |
if ($c) |
|
653
|
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) { } |
|
659
|
0 |
0 |
if $self->{'debug'} |
|
680
|
0 |
27 |
unless $f |
|
691
|
0 |
22 |
if $self->{'debug'} |
|
699
|
3 |
14 |
if ($f =~ /(?:of(?:f)?)/) |
|
702
|
0 |
3 |
if $self->{'debug'} |
|
710
|
10 |
28 |
if ($f =~ /^($just)/i) |
|
717
|
4 |
10 |
unless $col->{$c} |
|
719
|
0 |
10 |
if $self->{'debug'} |
|
740
|
0 |
2 |
if $self->{'debug'} |
|
748
|
0 |
2 |
if $self->{'debug'} |
|
755
|
0 |
0 |
if $self->{'debug'} |
|
763
|
0 |
0 |
if $self->{'debug'} |
|
771
|
0 |
1 |
if $self->{'debug'} |
|
779
|
0 |
0 |
if $self->{'debug'} |
|
785
|
0 |
0 |
if $self->{'debug'} |
|
793
|
0 |
0 |
if $self->{'debug'} |
|
799
|
0 |
0 |
if $self->{'debug'} |
|
817
|
0 |
0 |
if exists $col->{'truncated'} and exists $col->{'wrapped'} and $col->{'truncated'} and $col->{'wrapped'} |
|
819
|
0 |
29 |
if defined $col->{'truncated'} |
|
820
|
0 |
29 |
if defined $col->{'wrapped'} |
|
822
|
10 |
19 |
if (defined $col->{'justify'}) |
|
823
|
2 |
8 |
if ($col->{'justify'} eq 'l') { } |
|
|
5 |
3 |
elsif ($col->{'justify'} eq 'r') { } |
|
|
3 |
0 |
elsif ($col->{'justify'} eq 'c') { } |
|
825
|
0 |
2 |
defined $col->{'wrapped'} ? : |
|
828
|
0 |
5 |
defined $col->{'wrapped'} ? : |
|
831
|
0 |
3 |
defined $col->{'wrapped'} ? : |
|
834
|
0 |
0 |
if $self->{'debug'} |
|
841
|
0 |
29 |
unless (defined $col->{'length'}) |
|
874
|
8 |
0 |
if (exists $$column_formats->{$column}) { } |
|
894
|
27 |
0 |
if ($format_requested =~ /a(\d+)/i) { } |
|
|
0 |
0 |
elsif ($format_requested =~ /^date$/) { } |
|
|
0 |
0 |
elsif ($format_requested =~ /(\d+)/) { } |
|
921
|
0 |
0 |
if $p1 |
|
922
|
0 |
0 |
if $s1 |
|
933
|
0 |
0 |
if ($format_requested =~ /\$/) |
|
939
|
0 |
0 |
if $format_requested =~ /B/i |
|
941
|
0 |
0 |
if $format_requested =~ /MI/i |
|
943
|
0 |
0 |
if $format_requested =~ /S/i |
|
945
|
0 |
0 |
if $format_requested =~ /PR/i |
|
947
|
0 |
0 |
if $format_requested =~ /D/i |
|
949
|
0 |
0 |
if $format_requested =~ /G/i |
|
951
|
0 |
0 |
if $format_requested =~ /C/i |
|
953
|
0 |
0 |
if $format_requested =~ /L/i |
|
955
|
0 |
0 |
if $format_requested =~ /\./ |
|
957
|
0 |
0 |
if $format_requested =~ /V/i |
|
959
|
0 |
0 |
if $format_requested =~ /EEEE/i |
|
962
|
0 |
0 |
if ($format_requested =~ /\,/) |
|
972
|
0 |
27 |
if $self->{'debug'} |
|
1141
|
0 |
0 |
$commify ? : |
|
1147
|
0 |
0 |
$commify ? : |
|
1153
|
0 |
0 |
$commify ? : |
|
1159
|
0 |
0 |
$commify ? : |
|
1166
|
0 |
0 |
$num > 0 ? : |
|
1167
|
0 |
0 |
$commify ? : |
|
1173
|
0 |
0 |
$num > 0 ? : |
|
|
0 |
0 |
$num > 0 ? : |
|
1177
|
0 |
0 |
$commify ? : |
|
1187
|
0 |
0 |
unless @_ |
|
1195
|
0 |
0 |
unless @_ |
|
1231
|
0 |
24 |
unless defined $command |
|
1234
|
21 |
3 |
if (@_) |
|
1236
|
6 |
15 |
if ($val =~ /off/i) { } |
|
1265
|
0 |
0 |
unless (ref $sth) |
|
1284
|
1 |
0 |
if $dbh->err |
|
1285
|
1 |
0 |
if $dbh->err |
|
1286
|
1 |
0 |
if $dbh->err |
|
1288
|
1 |
0 |
if defined $codes |
|
1314
|
0 |
0 |
if (@args) |
|
1321
|
0 |
0 |
unless (ref $sth) |
|
1351
|
0 |
0 |
unless defined $type |
|
1354
|
0 |
0 |
if (@args) { } |
|
1361
|
0 |
0 |
unless (ref $sth) |