Branch Coverage

blib/lib/IO/BLOB/Pg.pm
Criterion Covered Total %
branch 0 92 0.0


line true false branch
26 0 0 $self->open(@_) ? :
32 0 0 unless ref $self
34 0 0 if (@_ == 2) { }
0 0 elsif (@_ == 1) { }
44 0 0 if *$self->{'dbi'}{'AutoCommit'}
50 0 0 unless (defined *$self->{'fh'} or not defined *$self->{'id'})
67 0 0 if @_
68 0 0 unless defined $old and CORE::length $old
82 0 0 if $IO::BLOB::Pg::DEBUG
83 0 0 if ref $_[0]
92 0 0 if $IO::BLOB::Pg::DEBUG
98 0 0 if defined(*$self->{'dbi'} && defined *$self->{'fh'})
117 0 0 if $self->read($buf, 1)
143 0 0 if (defined $\) { }
144 0 0 if (defined $,) { }
150 0 0 if (defined $,) { }
162 0 0 if $IO::BLOB::Pg::DEBUG
174 0 0 if $DBI::err or not defined $pos
177 0 0 if (defined $pos and $pos < 0) { }
0 0 elsif (defined $pos) { }
183 0 0 if defined $pos
202 0 0 unless defined $SEEK_SET
204 0 0 if (@_)
208 0 0 $pos > $len ? :
231 0 0 if $pos >= $len
234 0 0 unless (defined $/)
240 0 0 unless (CORE::length $/)
246 0 0 if ($c eq "\n") { }
0 0 elsif ($eol > 1) { }
263 0 0 if ($idx > $[ - 1) { }
281 0 0 unless wantarray
290 0 0 if wantarray
298 0 0 if @_
307 0 0 if ($self->_length > $len) { }
0 0 elsif ($self->_length < $len) { }
330 0 0 if (@_ > 2) { }
349 0 0 if (@_ > 1)
350 0 0 if $_[1] < $len
351 0 0 if (@_ > 2)
353 0 0 if $off > $slen
354 0 0 if ($off < 0)
356 0 0 if $off < 0
359 0 0 if $rem < $len
374 0 0 unless $self->opened
375 0 0 unless wantarray
397 0 0 if @_