Branch Coverage

blib/lib/XML/Validator/Schema/SimpleType.pm
Criterion Covered Total %
branch 40 68 58.8


line true false branch
327 0 228 unless $self == $root or $FACET{$key} & $$root{'facets'}
348 18 626 if ($$self{'restrict'}{'whiteSpace'})
350 10 8 if ($ws eq 'replace') { }
8 0 elsif ($ws eq 'collapse') { }
359 301 325 if $$self{'base'}
372 175 168 if ($$self{'base'})
374 12 163 unless $ok
380 0 331 if ($$r{'length'})
382 0 0 unless length $value eq $len
387 0 331 if ($$r{'maxLength'})
389 0 0 if length $value > $len
394 0 331 if ($$r{'minLength'})
396 0 0 if length $value < $len
401 5 326 if ($$r{'enumeration'})
404 1 4 unless grep {$_ eq $value;} @{$$r{'enumeration'};}
407 218 112 if ($$r{'pattern'})
410 183 35 if ($value =~ /$pattern/)
415 35 183 unless $pass
419 58 237 if ($$r{'minInclusive'})
421 17 41 if $value < $min
426 0 278 if ($$r{'minExclusive'})
428 0 0 if $value <= $min
433 54 224 if ($$r{'maxInclusive'})
435 12 42 if $value > $max
440 0 266 if ($$r{'maxExclusive'})
442 0 0 if $value >= $max
447 0 266 if ($$r{'totalDigits'} or $$r{'fractionDigits'})
451 0 0 if ($$r{'totalDigits'})
453 0 0 if $digits =~ tr/0-9// > $tdigits
458 0 0 if ($$r{'fractionDigits'})
460 0 0 if $digits =~ /\.\d{$fdigits}\d/
480 0 10 if $y != abs int $y
481 0 10 unless 1 <= $m and $m <= 12
482 1 9 unless 1 <= $d and $d <= $days_in_month[_leap_year($y)][$m]