Branch Coverage

blib/lib/Class/Member/GLOB.pm
Criterion Covered Total %
branch 17 22 77.2


line true false branch
28 1 25 unless (UNIVERSAL::isa($I, 'GLOB'))
32 2 23 if ($#_ >= 0)
46 1 1 if (ref $parent)
54 3 3 if exists $o{$m}
58 2 0 if ($init)
67 5 5 if ($name =~ /^-(.*)/) { }
69 3 2 if ($o eq 'CLASS_MEMBERS') { }
0 2 elsif ($o =~ /^NEW=(.+)/) { }
1 1 elsif ($o eq 'NEW') { }
1 0 elsif ($o =~ /^INIT=(.+)/) { }
0 0 elsif ($o eq 'INIT') { }