Branch Coverage

blib/lib/Fsdb/IO/Reader.pm
Criterion Covered Total %
branch 0 106 0.0


line true false branch
122 0 0 unless ($self->{'_fh'} or $self->{'_queue'})
126 0 0 if ($self->{'_fh'} and ref $self->{'_fh'} eq 'IO::Pipe')
134 0 0 unless (defined $self->{'_headerrow'})
139 0 0 if (defined $self->{'_headerrow'}) { }
158 0 0 if ($aaref->[0] eq '-file') { }
0 0 elsif ($aaref->[0] eq '-comment_handler') { }
163 0 0 if ($file eq '-') { }
170 0 0 if ($fh) { }
193 0 0 if (not defined $self->{'_comment_handler'}) { }
0 0 elsif (ref $self->{'_comment_handler'} eq 'CODE') { }
0 0 elsif (ref($self->{'_comment_handler'}) =~ /^Fsdb::IO::Writer/) { }
0 0 elsif (ref $self->{'_comment_handler'} eq 'SCALAR') { }
221 0 0 unless $self->{'_compression'}
226 0 0 unless $self->{'_fh'} = 'IO::Uncompress::AnyUncompress'->new($phy_fh)
241 0 0 if $self->{'_error'}
242 0 0 if defined $self->{'_fh'} and defined $self->{'_queue'}
243 0 0 if (defined $self->{'_fh'}) { }
0 0 elsif (defined $self->{'_queue'}) { }
244 0 0 if $self->{'_compression'} and $self->{'_header_set'}
246 0 0 if ($self->{'_rscode'} eq 'D') { }
0 0 elsif ($self->{'_rscode'} eq 'C' or $self->{'_rscode'} eq 'I') { }
255 0 0 unless defined $line
256 0 0 if $line =~ /^\s*\#/
276 0 0 if $self->{'_rowize_eof'}
281 0 0 unless (defined $line)
285 0 0 if $line =~ /^\s*\#/
286 0 0 if ($line =~ /^\s*$/)
287 0 0 if $self->{'_rowize_started_row'}
292 0 0 unless defined $key
293 0 0 if $value =~ /$fsre/
294 0 0 if not defined $value or $value eq ''
296 0 0 unless defined $i
301 0 0 if $self->{'_rowize_eof'} and not $self->{'_rowize_started_row'}
330 0 0 if $self->{'_error'}
334 0 0 if (not defined $headerrow or ref $headerrow)
336 0 0 if (not defined $printable_hr) { }
0 0 elsif (ref $printable_hr ne 'SCALAR') { }
342 0 0 if length $printable_hr > 200
413 0 0 if defined $self->{'_error'}
416 0 0 if ($#{$$self{'_unreadq'};} >= 0)
439 0 0 if (not defined $rowobj) { }
0 0 elsif (not ref $rowobj) { }
463 0 0 if $self->{'_fastpath_active'}
478 0 0 if $self->{'_fastpath_active'}
496 0 0 unless $self->read_row_to_aref(\@a)
516 0 0 unless defined $i
534 0 0 if defined $self->{'_error'}
535 0 0 unless defined $self->{'_headerrow'}
536 0 0 if $#{$$self{'_unreadq'};} >= 0
554 0 0 unless $self->fastpath_ok
562 0 0 unless defined $comment_sub
568 0 0 if (not defined $rowobj) { }
0 0 elsif (not ref $rowobj) { }