| blib/lib/IO/Socket/Telnet/HalfDuplex.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 9 | 18 | 50.0 | 
| line | true | false | branch | 
|---|---|---|---|
| 73 | 0 | 3 | if $ping < 40 or $ping >= 240 | 
| 82 | 2 | 0 | if @_ | 
| 108 | 102 | 0 | if (defined $self->recv($b, 4096, 0)) | 
| 110 | 12 | 90 | if ${*{$self;};}{'got_pong'} | 
| 113 | 0 | 0 | unless $!{'EINTR'} | 
| 117 | 0 | 12 | unless $@ =~ /^got pong\n/ | 
| 128 | 12 | 0 | if ($option =~ / $ping$/) | 
| 130 | 10 | 2 | unless $external_callback | 
| 134 | 0 | 0 | unless $external_callback |