Branch Coverage

blib/lib/Object/MultiType.pm
Criterion Covered Total %
branch 41 64 64.0


line true false branch
48 0 17 if (not defined $args{'boolsub'} and defined $args{'boolcode'})
50 3 14 if (exists $args{'bool'}) { }
1 13 elsif ($args{'boolsub'}) { }
56 0 17 if (not defined $args{'scalarsub'} and defined $args{'scalarcode'})
58 10 7 if (defined $args{'scalar'}) { }
1 6 elsif ($args{'scalarsub'}) { }
64 1 16 if (ref $args{'array'} eq 'ARRAY') { }
0 16 elsif ($args{'tiearray'}) { }
66 0 0 if ($args{'tieonuse'}) { }
73 1 16 if (ref $args{'hash'} eq 'HASH') { }
0 16 elsif ($args{'tiehash'}) { }
75 0 0 if ($args{'tieonuse'}) { }
82 1 16 if (ref $args{'code'} eq 'CODE')
84 0 17 if ($args{'tiehandle'})
85 0 0 unless ($args{'glob'})
87 0 0 if ($args{'tieonuse'}) { }
91 1 16 if (ref $args{'glob'} eq 'GLOB')
103 2 5 unless (exists $$$this{'b'})
109 2 3 if (ref $bool and ref $$bool eq 'CODE')
114 1 2 if (ref $bool eq 'SCALAR')
127 1 11 if (ref $$scalar eq 'CODE') { }
143 0 2 if (ref $$scalar eq 'CODE') { }
162 0 2 if (ref $$scalar eq 'CODE') { }
180 0 0 if (ref $$scalar eq 'CODE') { }
194 0 1 if ($$$this{'TIEONUSE'}{'a'})
210 0 1 if ($$$this{'TIEONUSE'}{'h'})
226 1 0 unless ($$$this{'SUBCODE'})
233 0 1 if (wantarray) { }
258 0 1 if ($$$this{'TIEONUSE'}{'g'})
291 0 17 if ($nodefault) { }
317 34 11 if ($#_ == 0) { }
3 8 elsif (ref $_[1] ne 'SCALAR' and ref $_[1] ne 'REF') { }