blib/lib/Class/MakeMethods/Template/Generic.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 4 | 5 | 80.0 |
line | l | !l | condition |
---|---|---|---|
1055 | 14 | 6 | $Class::MakeMethods::Template::Hash::bits{$$m_info{'target_class'}} ||= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
1054 | 0 | 14 | 6 | $$m_info{'bfp'} ||= do { my $array = ($Class::MakeMethods::Template::Hash::bits{$$m_info{'target_class'}} ||= []); my $idx; foreach $_ (0 .. $#$array) { if ($$array[$_] eq $$m_info{'name'}) { $idx = $_; last; }; }; unless ($idx) { push @$array, $$m_info{'name'}; $idx = $#$array; }; $idx } |