Branch Coverage

blib/lib/Device/Pertelian.pm
Criterion Covered Total %
branch 0 8 0.0


line true false branch
50 0 0 unless (ref $self)
54 0 0 if ($device)
64 0 0 unless open $self->{'_fh'}, '>', $device
79 0 0 if ($self->{'_fh'})