Branch Coverage

blib/lib/Data/AMF/IO.pm
Criterion Covered Total %
branch 7 22 31.8


line true false branch
6 0 7 unpack('S', "\000\cA") == 1 ? :
34 24 153 if ($len + $self->pos > &bytes::length($self->data))
48 24 126 unless defined $data
57 0 0 unless defined $data
66 0 0 unless defined $data
68 0 0 if $] >= 5.009002
92 5 0 if $] >= 5.009002
101 0 0 unless defined $len
110 0 0 unless defined $len
137 0 0 if $] >= 5.009002
159 2 0 if $] >= 5.009002