| line |
true |
false |
branch |
|
12
|
0 |
9 |
if exists $args{'PeerAddr'} or exists $args{'PeerHost'} |
|
17
|
0 |
9 |
unless defined $self |
|
34
|
1 |
0 |
if @_ |
|
40
|
1 |
0 |
if @_ |
|
73
|
0 |
0 |
if (exists $options{$opt}) |
|
81
|
0 |
0 |
if (exists $options{$opt}) |
|
89
|
0 |
0 |
if (exists $options{$opt}) |
|
97
|
0 |
0 |
if (exists $options{$opt}) |
|
189
|
32 |
17 |
if (${*$self;}{'telnet_mode'} eq 'normal') |
|
192
|
10 |
22 |
if length $in == 0 |
|
201
|
36 |
86 |
if defined $o |
|
202
|
74 |
48 |
if defined $m |
|
213
|
1 |
12 |
if (${*$self;}{'telnet_simple_cb'}) |
|
223
|
1 |
0 |
unless defined $response |
|
225
|
0 |
0 |
if ($response eq '0') |
|
226
|
0 |
0 |
if ($mode eq $DONT) |
|
227
|
0 |
0 |
if ($mode eq $DO) |
|
228
|
0 |
0 |
if ($mode eq $WILL) |
|
229
|
0 |
0 |
if ($mode eq $WONT) |
|
233
|
0 |
0 |
if ($response eq '1') |
|
234
|
0 |
0 |
if ($mode eq $DO) |
|
235
|
0 |
0 |
if ($mode eq $DONT) |
|
236
|
0 |
0 |
if ($mode eq $WONT) |
|
237
|
0 |
0 |
if ($mode eq $WILL) |
|
244
|
0 |
0 |
if ($r eq 'DO' or $r eq 'DONT' or $r eq 'WILL' or $r eq 'WONT') |
|
251
|
13 |
0 |
unless defined $response |
|
260
|
4 |
9 |
if ($mode eq $DO) { } |
|
|
3 |
6 |
elsif ($mode eq $DONT) { } |
|
|
3 |
3 |
elsif ($mode eq $WILL) { } |
|
|
3 |
0 |
elsif ($mode eq $WONT) { } |
|
270
|
4 |
1 |
unless ${*$self;}{'telnet_complex_cb'} |