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] |