Branch Coverage

lib/self/init.pm
Criterion Covered Total %
branch 15 16 93.7


line true false branch
113 2 8 unless (eval { do { $class->$method(@args); 1 } })
125 2 6 unless @_
131 5 11 if (ref $v and ref $v eq 'ARRAY' and not defined $key) { }
5 6 elsif (ref $v eq 'SCALAR' and do { local $_ = $$v; $v = $_ if s/^-// }) { }
134 5 0 if s/^-//
135 2 3 if defined $key
142 3 2 if defined $key
149 1 4 unless @_