blib/lib/Device/RFXCOM/Base.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 23 | 24 | 95.8 |
line | true | false | branch |
---|---|---|---|
36 | 10 | 2 | unless $self->{'plugins'} |
56 | 14 | 8 | unless exists $p{'raw'} |
57 | 8 | 14 | unless exists $p{'hex'} |
60 | 10 | 12 | unless $self->{'_waiting'} |
68 | 19 | 9 | if ($wait_record) |
71 | 3 | 16 | if $cb |
73 | 9 | 19 | unless defined $rec |
91 | 2 | 9 | $self->{'device'} =~ m([/\\]) ? : |
100 | 2 | 7 | unless $dev =~ /:/ |
101 | 5 | 4 | unless my $fh = 'IO::Socket::INET'->new($dev) |
111 | 0 | 2 | unless my $sport = tie(*$fh, 'Device::SerialPort', $dev) |
120 | 1 | 1 | unless sysopen $fh, $dev, 2306 |