Branch Coverage

blib/lib/Type/Simple.pm
Criterion Covered Total %
branch 57 64 89.0


line true false branch
57 1414 6 if (ref $fn eq 'CODE') { }
6 0 elsif (ref $fn eq 'Regexp') { }
60 4 2 $x =~ /$fn/ ? :
71 192 754 unless apply($fn, $x)
82 19 16 if apply($fn, $x)
92 30 104 apply($fn, $x) ? :
104 1 8 unless defined $x
105 1 7 if $x eq ''
106 2 5 if $x =~ /^[01]$/
115 309 16 defined $x ? :
134 74 109 ref $x ? :
152 3 3 $x =~ /^[[:alpha:]]+$/ ? :
162 1 1 $x =~ /^[[:alnum:]]+$/ ? :
172 1 1 $x =~ /^[[:ascii:]]+$/ ? :
182 2 0 $x =~ /^[[:print:]]+$/ ? :
192 1 1 $x =~ /^[[:punct:]]+$/ ? :
202 1 0 $x =~ /^[[:space:]]+$/ ? :
212 1 0 $x =~ /^[[:word:]]+$/ ? :
222 40 13 &looks_like_number($x) ? :
232 28 2 if $x =~ /^[0-9]+$/
243 1 0 ref $x eq 'SCALAR' ? :
255 1 13 unless ref $x eq 'ARRAY'
256 2 11 unless $fn
260 2 44 unless apply($fn, $item)
275 1 42 unless ref $x eq 'HASH'
276 7 35 unless $fn
280 2 91 unless apply($fn, $x->{$key})
296 1 7 if ($key =~ /^CODE\(0x[0-9a-f]+\)$/)
300 1 6 unless apply($fn, $x->{$key})
313 1 0 ref $x eq 'CODE' ? :
323 1 0 ref $x eq 'Regexp' ? :
333 1 1 &blessed($x) ? :