Branch Coverage

blib/lib/Mock/Person/SK/ROM.pm
Criterion Covered Total %
branch 8 12 66.6


line true false branch
329 1 2 if (not defined $sex or &none(sub { $sex eq $_; } , 'female', 'male')) { }
1 1 elsif ($sex eq 'female') { }
1 0 elsif ($sex eq 'male') { }
330 1 0 if ((int(rand 2) + 1) % 2 == 0) { }
344 2 0 if (defined $TYPE and $TYPE eq 'three') { }
358 1 0 if (defined $TYPE and $TYPE eq 'three') { }