| line |
true |
false |
branch |
|
36
|
24 |
4 |
unless (@p) |
|
39
|
1 |
28 |
unless $tags{$1} |
|
|
29 |
3 |
/\A:(\w+)\z/msx ? : |
|
43
|
1 |
398 |
unless $known{$const} |
|
59
|
6 |
56 |
if ref $opt ne 'HASH' or not $opt->{'cb'} or not +($opt->{'fh'} xor $opt->{'host'}) or ($opt->{'host'} xor $opt->{'port'}) |
|
89
|
19 |
37 |
unless ($self->{'fh'}) |
|
92
|
0 |
19 |
unless socket $self->{'fh'}, 2, 1, 6 |
|
95
|
0 |
19 |
unless fcntl $self->{'fh'}, 4, 2048 |
|
103
|
3 |
53 |
if (not $self->{'_id'}) { } |
|
|
3 |
50 |
elsif ($Active[$self->{'_id'}]) { } |
|
113
|
2 |
48 |
if ($opt->{'plugin'}) |
|
131
|
18 |
32 |
if (length $self->{'out_buf'}) |
|
143
|
166 |
68 |
if ($#_ > 0) |
|
165
|
156 |
1571 |
if ($e & 4 and not $w & 4) |
|
167
|
1 |
155 |
if (not $w & 16) { } |
|
|
1 |
154 |
elsif (not defined $self->{'in_buf_limit'}) { } |
|
174
|
154 |
1564 |
if (not $err and $e & 4 and not $w & 4) |
|
176
|
3 |
151 |
if ($l > 0 and length $self->{'in_buf'} > $l) |
|
181
|
782 |
945 |
if ($e or $err) |
|
182
|
777 |
5 |
if (ref $self->{'cb'} eq 'CODE') { } |