| line |
true |
false |
branch |
|
101
|
0 |
0 |
if $self->{'_autorun'} |
|
181
|
0 |
0 |
if (defined $_) |
|
280
|
0 |
0 |
if ($#{$argv_ref;} > 0 or $#{$argv_ref;} == 0 and defined $self->{'_target_column'}) { } |
|
|
0 |
0 |
elsif ($#{$argv_ref;} == 0) { } |
|
308
|
0 |
0 |
if (ref($p_copy) =~ /\:\:/) |
|
312
|
0 |
0 |
if $p_copy =~ /^(Fsdb::BoundedQueue|IO::Pipe)/ |
|
337
|
0 |
0 |
if ($option_name eq '<>') { } |
|
|
0 |
0 |
elsif ($option_name eq 'n' or $option_name eq 'numeric') { } |
|
|
0 |
0 |
elsif ($option_name eq 'N' or $option_name eq 'lexical') { } |
|
|
0 |
0 |
elsif ($option_name eq 'r' or $option_name eq 'descending') { } |
|
|
0 |
0 |
elsif ($option_name eq 'R' or $option_name eq 'descending') { } |
|
377
|
0 |
0 |
if ref $option_name |
|
379
|
0 |
0 |
unless defined $target |
|
381
|
0 |
0 |
$direction eq 'output' ? : |
|
385
|
0 |
0 |
if ($direction eq 'input' or $direction eq 'output') { } |
|
|
0 |
0 |
elsif ($direction eq 'inputs' or $direction eq 'outputs') { } |
|
423
|
0 |
0 |
if ($#_ >= 1 and $_[0] eq '-raw_fh' and $_[1]) |
|
426
|
0 |
0 |
if (ref($token) =~ /^Fsdb::IO/) { } |
|
432
|
0 |
0 |
if ($token_ref =~ /^Fsdb::BoundedQueue/) { } |
|
|
0 |
0 |
elsif ($token_ref =~ /^IO::/) { } |
|
|
0 |
0 |
elsif ($token_ref eq '' and $token eq '-') { } |
|
|
0 |
0 |
elsif ($token_ref eq '' and $token =~ /^\*main/) { } |
|
|
0 |
0 |
elsif ($token_ref eq '') { } |
|
445
|
0 |
0 |
if ($direction eq 'input') { } |
|
|
0 |
0 |
elsif ($direction eq 'output') { } |
|
453
|
0 |
0 |
if $fsdb->error |
|
486
|
0 |
0 |
if ($direction eq 'inputs') |
|
497
|
0 |
0 |
$direction eq 'input' ? : |
|
512
|
0 |
0 |
if ($direction eq 'input') { } |
|
|
0 |
0 |
elsif ($direction eq 'output') { } |
|
519
|
0 |
0 |
unless defined $encoding |
|
547
|
0 |
0 |
unless $direction eq 'input' or $direction eq 'output' |
|
552
|
0 |
0 |
if (ref($token) =~ /^Fsdb::IO/) { } |
|
|
0 |
0 |
elsif (ref($token) =~ /^Fsdb::BoundedQueue/) { } |
|
|
0 |
0 |
elsif (ref($token) =~ /^IO::/) { } |
|
|
0 |
0 |
elsif (ref $token eq '') { } |
|
561
|
0 |
0 |
if ($token eq '-') { } |
|
568
|
0 |
0 |
$direction eq 'input' ? : |
|
569
|
0 |
0 |
unless defined $encoding |
|
573
|
0 |
0 |
$direction eq 'input' ? : |
|
620
|
0 |
0 |
if (defined $self->{'_orig_argv'} and $#{$$self{'_orig_argv'};} != -1) |
|
622
|
0 |
0 |
if (ref $_ eq 'CODE') { } |
|
|
0 |
0 |
elsif ($_ =~ /\s/) { } |
|
649
|
0 |
0 |
unless (defined $self->{'_out'}) |
|
651
|
0 |
0 |
if defined $self->{'_delay_comments'} |
|
652
|
0 |
0 |
if $self->{'_logprog'} |
|
653
|
0 |
0 |
if defined $self->{'_save_output'} |
|
654
|
0 |
0 |
if $problems ne '' |
|
658
|
0 |
0 |
if (defined $self->{'_delay_comments'}) |
|
664
|
0 |
0 |
if ($self->{'_logprog'}) |
|
666
|
0 |
0 |
if (ref $self->{'_out'} eq '' or ref($self->{'_out'}) =~ /^IO::/) { } |
|
673
|
0 |
0 |
if defined $self->{'_save_output'} |
|
675
|
0 |
0 |
if $self->{'_close'} and defined $self->{'_out'} and not defined $self->{'_save_output'} |
|
779
|
0 |
0 |
if defined $self->{$value} |
|
820
|
0 |
0 |
unless defined $a_name |
|
821
|
0 |
0 |
unless defined $b_name |
|
842
|
0 |
0 |
if ($arg eq '-r') { } |
|
|
0 |
0 |
elsif ($arg eq '-R') { } |
|
|
0 |
0 |
elsif ($arg eq '-n') { } |
|
|
0 |
0 |
elsif ($arg eq '-N') { } |
|
|
0 |
0 |
elsif ($arg =~ /^-/) { } |
|
853
|
0 |
0 |
$reverse ? : |
|
854
|
0 |
0 |
$reverse ? : |
|
857
|
0 |
0 |
if ($reverse) |
|
862
|
0 |
0 |
unless defined $left_coli and defined $right_coli |
|
864
|
0 |
0 |
$numeric ? : |
|
|
0 |
0 |
$reverse ? : |
|
|
0 |
0 |
$numeric ? : |
|
876
|
0 |
0 |
if $fields_found == 0 |
|
891
|
0 |
0 |
if $x eq '-' |
|
906
|
0 |
0 |
if ($#{$$self{'_inputs'};} == -1) |
|
909
|
0 |
0 |
if ($#{$$self{'_inputs'};} > 1) |
|
912
|
0 |
0 |
if ($#{$$self{'_inputs'};} == 0) |
|
919
|
0 |
0 |
if $#{$$self{'_inputs'};} != 1 |