Branch Coverage

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


line true false branch
128 0 0 unless ($self->{'_fh'} or $self->{'_queue'})
132 0 0 if ($self->{'_fh'} and ref $self->{'_fh'} eq 'IO::Pipe')
140 0 0 unless (defined $self->{'_headerrow'})
145 0 0 if (defined $self->{'_headerrow'}) { }
164 0 0 if ($aaref->[0] eq '-file') { }
0 0 elsif ($aaref->[0] eq '-comment_handler') { }
169 0 0 if ($file eq '-') { }
176 0 0 if ($fh) { }
199 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') { }
227 0 0 unless $self->{'_compression'}
232 0 0 unless $self->{'_fh'} = 'IO::Uncompress::AnyUncompress'->new($phy_fh)
247 0 0 if $self->{'_error'}
248 0 0 if defined $self->{'_fh'} and defined $self->{'_queue'}
249 0 0 if (defined $self->{'_fh'}) { }
0 0 elsif (defined $self->{'_queue'}) { }
250 0 0 if $self->{'_compression'} and $self->{'_header_set'}
252 0 0 if ($self->{'_rscode'} eq 'D') { }
0 0 elsif ($self->{'_rscode'} eq 'C' or $self->{'_rscode'} eq 'I') { }
261 0 0 unless defined $line
262 0 0 if $line =~ /^\s*\#/
282 0 0 if $self->{'_rowize_eof'}
287 0 0 unless (defined $line)
291 0 0 if $line =~ /^\s*\#/
292 0 0 if ($line =~ /^\s*$/)
293 0 0 if $self->{'_rowize_started_row'}
298 0 0 unless defined $key
299 0 0 if $value =~ /$fsre/
300 0 0 if not defined $value or $value eq ''
302 0 0 unless defined $i
307 0 0 if $self->{'_rowize_eof'} and not $self->{'_rowize_started_row'}
336 0 0 if $self->{'_error'}
340 0 0 if (not defined $headerrow or ref $headerrow)
342 0 0 if (not defined $printable_hr) { }
0 0 elsif (ref $printable_hr ne 'SCALAR') { }
348 0 0 if length $printable_hr > 200
419 0 0 if defined $self->{'_error'}
422 0 0 if ($#{$$self{'_unreadq'};} >= 0)
445 0 0 if (not defined $rowobj) { }
0 0 elsif (not ref $rowobj) { }
469 0 0 if $self->{'_fastpath_active'}
484 0 0 if $self->{'_fastpath_active'}
502 0 0 unless $self->read_row_to_aref(\@a)
522 0 0 unless defined $i
540 0 0 if defined $self->{'_error'}
541 0 0 unless defined $self->{'_headerrow'}
542 0 0 if $#{$$self{'_unreadq'};} >= 0
560 0 0 unless $self->fastpath_ok
568 0 0 unless defined $comment_sub
574 0 0 if (not defined $rowobj) { }
0 0 elsif (not ref $rowobj) { }