Branch Coverage

blib/lib/Persistent/DataType/String.pm
Criterion Covered Total %
branch 16 38 42.1


line true false branch
145 0 0 unless defined $max_length
182 0 267 unless @_ == 1 or @_ == 2
184 0 267 unless ref $this
189 122 145 if (@_)
191 0 122 if defined $value and $value eq ''
195 0 122 if (defined $value and $max_length > 0 and CORE::length $value > $max_length) { }
228 0 2 unless @_ == 1
230 0 2 unless ref $this
270 0 0 unless @_ > 0
272 0 0 unless ref $this
277 0 0 if @_
280 0 0 defined $this->value ? :
316 0 166 unless @_ == 1 or @_ == 2
318 0 166 unless ref $this
323 44 122 if (@_)
325 0 44 if not defined $max_length or $max_length eq ''
326 0 44 if $max_length < 0
330 44 0 if ($max_length > 0)
332 0 44 if (defined $value and CORE::length $value > $max_length)