Branch Coverage

blib/lib/Class/Accessor.pm
Criterion Covered Total %
branch 26 34 76.5


line true false branch
119 3 7 unless defined $fields
161 3 48 if ($accessor_name eq 'DESTROY' or $mutator_name eq 'DESTROY')
164 33 18 if ($accessor_name eq $mutator_name) { }
166 19 14 if ($ra and $wa) { }
7 7 elsif ($ra) { }
173 27 6 unless (defined &{"${class}::$accessor_name";})
176 33 0 if ($accessor_name eq $field)
179 33 0 unless defined &{"${class}::$alias";}
182 12 6 if ($ra and not defined &{"${class}::$accessor_name";})
185 12 6 if ($wa and not defined &{"${class}::$mutator_name";})
334 7 0 if (@_ == 1) { }
0 0 elsif (@_ > 1) { }
359 14 0 if (@_ == 1) { }
0 0 elsif (@_ > 1) { }
389 3 7 if (@_) { }
415 1 5 if (@_) { }
442 1 3 if (not @_) { }