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) |
186
|
18 |
7 |
ref $_[-1] eq 'CODE' ? : |
191
|
25 |
0 |
if (ref $self->{'stream'}) { } |
205
|
0 |
13 |
length $_[1] ? : |
214
|
0 |
1 |
unless $ts |
236
|
6 |
1 |
if (lc $old_nick eq lc $self->nick) |
245
|
1 |
9 |
if ($message->{'params'}[1] =~ /Ident broken.*QUOTE PASS (\S+)/u) |
262
|
2 |
22 |
unless $params->[$i] =~ /([A-Z]+)=?(\S*)/u |
293
|
0 |
7 |
unless my $ioloop = $self->ioloop |
297
|
4 |
3 |
if $sid |
298
|
1 |
6 |
if $tid |
316
|
49 |
4 |
unless $event =~ /^(ctcp(reply)?|err)_/u |
333
|
0 |
53 |
unless my $cmd = $msg->{'command'} |
334
|
39 |
14 |
if $cmd =~ /^\d+$/u |