Branch Coverage

lib/Math/String.pm
Criterion Covered Total %
branch 65 94 69.1


line true false branch
40 0 163 unless defined $str
41 7 156 if ref $str1
42 0 163 unless defined $str1
43 0 163 $_[2] ? :
76 0 51 unless defined $val
77 0 51 if not ref $val and $val eq $class
82 5 46 if (ref $set and ref $set eq 'HASH' || UNIVERSAL::isa($set, 'Math::String::Charset'))
86 5 0 if defined $set->{'_scale'}
104 2 1 if (defined $self) { }
109 0 2 if ref $self ne $class
125 0 2 if (defined $self) { }
130 0 0 if ref $self ne $class
140 2 0 if $min <= 0
148 6 1 if (defined $self) { }
153 0 6 if ref $self ne $class
169 1 1 if (defined $self) { }
174 0 1 if ref $self ne $class
194 0 122 unless defined $value
197 3 119 if (ref $value eq 'HASH') { }
13 106 elsif (ref $value) { }
203 1 2 if defined $self->{'_set'}{'_scale'}
210 0 13 if defined $_[0]
229 47 118 unless defined $cs
230 153 12 if ref($cs) =~ /^(ARRAY|HASH)$/
231 0 165 unless ref $cs
247 4 110 unless $cs->is_valid($value)
250 0 110 unless (ref $int)
265 0 174 if (@_ > 1) { }
275 0 174 unless ref $x
281 174 515 if ($k eq 'value') { }
0 515 elsif ($ref eq 'SCALAR') { }
0 515 elsif ($ref eq 'ARRAY') { }
0 515 elsif ($ref eq 'HASH') { }
174 341 elsif ($ref =~ /^Math::String::Charset/) { }
0 341 elsif ($ref) { }
359 0 241 unless ref $x
360 7 234 unless $x->{'sign'} =~ /^[+-]$/
362 141 93 if defined $x->{'_cache'}
384 13 58 if exists $self->{'_set'}{'_scale'}
403 3 2 if (not ref $_[0] and $_[0] eq 'Math::String')
415 1 2 if (not ref $_[0] and $_[0] eq 'Math::String')
435 2 0 if (defined $x->{'_cache'}) { }
445 0 0 if $l < $x->minlen or $l > $x->maxlen
454 122 0 ref $_[0] ? :
462 89 33 if (defined $str)
475 79 0 ref $_[0] ? :
483 76 3 if (defined $str)