Branch Coverage

blib/lib/File/KDBX/IO.pm
Criterion Covered Total %
branch 31 58 53.4


line true false branch
33 285 2310 if @_
34 73 289 ref $default eq 'CODE' ? :
41 94 0 if "5.005" <= $]
46 0 94 if &in_global_destruction()
61 0 0 if @{$self->_buffer_in;}
71 0 86 unless $self->write($buf, length $buf)
77 0 0 ((shift())->read($c, 1) // 0) == 1 ? :
81 322 0 unless XXX
84 56 266 unless $self->_mode
86 0 322 unless my $fh = $self->_fh
87 0 322 if defined $len and $len == 0
90 256 66 if (not $append) { }
11 55 elsif (not defined $$out) { }
91 256 0 if (not $offset) { }
95 0 0 if (length $$out < $offset) { }
112 66 0 unless ($len or $offset)
113 0 66 if (@$buffer) { }
115 0 0 if ($append) { }
124 11 55 unless my $fill = $self->_FILL($fh)
125 55 0 if ($append) { }
137 108 52 if empty($fill)
146 134 49 if ($wanted < length $read) { }
164 38 78 unless $self->_mode
183 11 0 if (not defined $/) { }
0 0 elsif (XXX and ${$/;} =~ /^\d+$/ and 0 < ${$/;}) { }
0 0 elsif (length $/ == 0) { }
204 0 0 unless wantarray
283 94 0 if XXX
292 0 11 if wantarray