| line |
true |
false |
branch |
|
139
|
0 |
0 |
if $on_closed |
|
174
|
1 |
0 |
if $$self{'on_ping_timeout'} |
|
195
|
3 |
15 |
if exists $args{$_} |
|
198
|
1 |
5 |
if (exists $args{'pingtime'}) |
|
202
|
1 |
5 |
if (exists $args{'pongtime'}) |
|
206
|
0 |
6 |
if (exists $args{'encoding'}) |
|
209
|
0 |
0 |
unless defined $obj |
|
222
|
0 |
0 |
if $$self{'pingtimer'} and $self->get_loop |
|
231
|
0 |
0 |
if $$self{'pingtimer'} and $self->get_loop |
|
251
|
1 |
5 |
unless my $connect_f = $$self{'connect_f'} |
|
265
|
1 |
1 |
unless my $login_f = $$self{'login_f'} |
|
276
|
8 |
6 |
$pingtimer->is_running ? : |
|
278
|
13 |
1 |
if eval {
do {
$self->Protocol::IRC::on_read($$buffref);
1
}
} |
|
285
|
1 |
0 |
if $self->maybe_invoke_event('on_irc_error', $e) |
|
366
|
13 |
21 |
unless my $retref = $self->maybe_invoke_event(@_) |
|
375
|
0 |
1 |
unless $$self{'pongtimer'}->is_running |
|
380
|
1 |
0 |
if $$self{'on_pong_reply'} |