Branch Coverage

blib/lib/Acme/Hospital/Bed.pm
Criterion Covered Total %
branch 7 22 31.8


line true false branch
16 1 0 unless ($self->{'names'})
21 1 0 unless ($self->{'phrases'})
70 0 0 unless (ref $self)
83 0 19 if ($available == 0)
94 19 0 if ($ans eq 'y') { }
0 0 elsif ($patient{'level'} > 5) { }
97 0 19 $patient{'level'} < 6 ? :
103 0 19 unless $_[1]
110 0 171 if ($_->{'length'} == 0)
119 0 0 if ($_[0]{'lifes'}-- == 0)
130 0 0 unless ($answer =~ /y|n/)