| line |
true |
false |
branch |
|
139
|
0 |
0 |
if $on_closed |
|
174
|
1 |
0 |
if $self->{'on_ping_timeout'} |
|
195
|
4 |
29 |
if exists $args{$_} |
|
198
|
1 |
10 |
if (exists $args{'pingtime'}) |
|
202
|
1 |
10 |
if (exists $args{'pongtime'}) |
|
206
|
1 |
10 |
if (exists $args{'encoding'}) |
|
209
|
0 |
1 |
unless defined $obj |
|
222
|
9 |
11 |
if $message->command =~ /^\d+$/u |
|
223
|
14 |
6 |
if $message->args > 1 |
|
247
|
1 |
5 |
unless my $connect_f = $self->{'connect_f'} |
|
263
|
1 |
1 |
unless my $login_f = $self->{'login_f'} |
|
274
|
13 |
8 |
$pingtimer->is_running ? : |
|
276
|
20 |
1 |
if eval {
do {
$self->Protocol::IRC::on_read($$buffref);
1
}
} |
|
283
|
1 |
0 |
if $self->maybe_invoke_event("on_irc_error", $e) |
|
383
|
29 |
31 |
unless my $retref = $self->maybe_invoke_event(@_) |
|
392
|
0 |
1 |
unless $self->{'pongtimer'}->is_running |
|
397
|
1 |
0 |
if $self->{'on_pong_reply'} |