Branch Coverage

blib/lib/Device/RFXCOM/Decoder/X10.pm
Criterion Covered Total %
branch 18 18 100.0


line true false branch
23 34 7 unless my $res = from_rf($bytes)
26 4 3 if exists $res->{'unit'}
33 6 1 if (defined $u) { }
40 3 4 if ($f eq 'bright' or $f eq 'dim')
75 34 7 unless is_x10($bytes)
78 4 3 unless ($bytes->[2] & 128)
80 2 2 if $bytes->[0] & 4
92 26 15 unless scalar @$bytes == 4
94 7 8 if ($bytes->[2] ^ 255) == $bytes->[3] and ($bytes->[0] ^ 255) == $bytes->[1]