line |
true |
false |
branch |
53
|
11 |
4 |
unless defined $server |
54
|
1 |
3 |
if $old and $old eq $server |
56
|
3 |
0 |
unless $self->{'stream_id'} |
68
|
0 |
10 |
unless ($host) |
72
|
0 |
10 |
if ($self->{'stream_id'}) |
77
|
1 |
9 |
if ($self->local_address) |
80
|
0 |
10 |
if (my $tls = $self->tls) |
82
|
0 |
0 |
if $tls->{'ca'} |
85
|
0 |
0 |
if $tls->{'insecure'} |
86
|
0 |
0 |
if $tls->{'insecure'} |
103
|
1 |
8 |
if ($err) |
111
|
0 |
5 |
unless $self |
120
|
0 |
0 |
unless $self |
121
|
0 |
0 |
unless $self->ioloop |
131
|
1 |
7 |
if length $self->pass |
153
|
0 |
3 |
if (my $tid = delete $self->{'ping_tid'}) |
157
|
2 |
1 |
if ($self->{'stream'}) { } |
|
0 |
1 |
elsif ($cb) { } |
163
|
1 |
1 |
if $cb |
178
|
72 |
27 |
unless $self->has_subscribers($event) |
187
|
0 |
0 |
unless @_ |
194
|
18 |
7 |
ref $_[-1] eq 'CODE' ? : |
199
|
25 |
0 |
if (ref $self->{'stream'}) { } |
213
|
0 |
13 |
length $_[1] ? : |
222
|
0 |
1 |
unless $ts |
244
|
6 |
1 |
if (lc $old_nick eq lc $self->nick) |
253
|
1 |
9 |
if ($message->{'params'}[0] =~ /Ident broken.*QUOTE PASS (\S+)/u) |
270
|
2 |
22 |
unless $params->[$i] =~ /([A-Z]+)=?(\S*)/u |
301
|
0 |
7 |
unless my $ioloop = $self->ioloop |
305
|
4 |
3 |
if $sid |
306
|
1 |
6 |
if $tid |
317
|
0 |
53 |
if $self->{'track_any'} |
325
|
49 |
4 |
unless $event =~ /^(ctcp|err)_/u |
342
|
0 |
53 |
unless my $cmd = $msg->{'command'} |
343
|
39 |
14 |
if $cmd =~ /^\d+$/u |