Branch Coverage

blib/lib/Stats/LikeR.pm
Criterion Covered Total %
branch 70 90 77.7


line true false branch
29 1 25 $swapped ? :
60 4 1 if (@_ and ref $_[0]) { }
79 0 5 if ($ref_type ne "ARRAY" and $ref_type ne "HASH")
83 2 3 if ($ref_type eq "ARRAY" and ref $data->[0] eq "")
88 2 3 if ($single_arr == 1) { }
1 2 elsif ($ref_type eq 'ARRAY') { }
2 0 elsif ($ref_type eq 'HASH') { }
94 0 2 if (scalar @undef > 0)
112 0 2 if (scalar @undef > 0)
121 0 2 if $rows_printed >= $args{'nrows'}
133 0 3 if (scalar @undef > 0)
140 3 0 if (length $print_key < 9)
146 1 2 if $rows_printed >= $args{'nrows'}
155 0 523 unless -f $file
156 0 523 unless -r $file
159 1 522 if (defined $input_args{'delim'})
164 2 521 if ($file =~ /\.tsv$/i) { }
521 0 elsif ($file =~ /\.csv$/i) { }
180 0 523 if (scalar @undef_args > 0)
186 1 522 unless ($args{'output.type'} =~ /^(?:aoh|hoa|hoh)$/)
190 0 522 if (defined $filter and ref $filter eq 'CODE') { }
0 1040 elsif (defined $filter and ref $filter ne 'HASH') { }
198 522 6196 unless (@header)
201 522 0 if @line and defined $line[0]
206 10 512 if (scalar @header > 0 and $header[0] eq "")
211 1 521 if @dup_cols
212 4 518 if ($args{'output.type'} eq "hoh" and not defined $args{'row.names'})
215 0 522 if (defined $args{'row.names'} and not grep({$_ eq $args{'row.names'};} @header))
218 4 518 if ($filter)
220 0 4 if ($k =~ /^\d+$/) { }
224 0 4 unless defined $idx
233 1 6195 if (scalar @$line_ref != scalar @header)
239 20 74712 !defined($v) || $v eq '' ? :
242 1847 4348 if (@sorted_filter_flds)
246 0 1847 $fld == 0 ? :
247 1131 716 unless ($mapped_filters{$fld}->($line_ref, \%line_hash))
248 716 0 if ($fld > 0)
250 1 715 !defined($_) || $_ eq '' ? :
253 1131 716 if $skip
256 1863 3201 if ($args{'output.type'} eq 'aoh') { }
1114 2087 elsif ($args{'output.type'} eq 'hoa') { }
2087 0 elsif ($args{'output.type'} eq 'hoh') { }
263 1 2086 if $seen_rownames{$row_name}++
265 2087 27084 if $col eq $args{'row.names'}
270 509 12 if ($args{'output.type'} eq 'aoh') { }