| line |
true |
false |
branch |
|
69
|
0 |
0 |
if $$self{'socket'} |
|
72
|
0 |
0 |
unless my $sock = 'IO::Socket::INET'->new('PeerAddr', $host, 'PeerPort', $port, 'Proto', 'tcp', 'Blocking', 0) |
|
89
|
0 |
0 |
if ($! = $sock->sockopt(4)) { } |
|
127
|
0 |
0 |
if $$self{'rw'} |
|
128
|
0 |
0 |
unless $$self{'socket'} |
|
136
|
0 |
0 |
if (defined $l) { } |
|
137
|
0 |
0 |
if ($l == 0) { } |
|
145
|
0 |
0 |
if ($! == 11) { } |
|
160
|
0 |
0 |
unless $$self{'socket'} and $$self{'connected'} and length $$self{'outbuf'} > 0 |
|
164
|
0 |
0 |
unless (defined $$self{'ww'}) |
|
169
|
0 |
0 |
if (defined $l) { } |
|
171
|
0 |
0 |
if (length $$self{'outbuf'} == 0) |
|
174
|
0 |
0 |
if ($! == 11) { } |
|
210
|
0 |
0 |
if $$self{'socket'} |
|
349
|
0 |
0 |
if ($cmd =~ /^irc_(\S+)/i) { } |
|
382
|
0 |
0 |
if &$_($self, @arg) |
|
407
|
0 |
0 |
if &$_($self, $m) |
|
415
|
0 |
0 |
if &$_($self, $m) |