line |
true |
false |
branch |
28
|
0 |
12 |
if ($autoconnect and not $opts{'address'} && $opts{'port'}) |
33
|
0 |
12 |
if ($usessl and not $GOT_SSL) |
37
|
12 |
0 |
unless $opts{'timeout'} and $opts{'timeout'} =~ /^\d+$/ |
41
|
11 |
1 |
unless defined $self->{'_prefix'} |
42
|
1 |
11 |
unless $self->{'_prefix'} =~ /\_$/ |
43
|
0 |
12 |
ref $options eq 'HASH' ? : |
68
|
0 |
0 |
if defined $self->{'context'} |
78
|
0 |
2 |
unless $self->{'_server_info'} |
80
|
1 |
1 |
if wantarray |
90
|
0 |
1 |
unless $self->{'socket'} |
102
|
0 |
12 |
if ($self->{'alias'}) { } |
109
|
11 |
1 |
if ($kernel != $sender) |
119
|
1 |
0 |
if $autoconnect and $self->{'address'} and $self->{'port'} |
126
|
9 |
1 |
if (ref $_[10] eq 'HASH') { } |
133
|
9 |
1 |
unless ($self->{'address'} and $self->{'port'}) |
134
|
0 |
9 |
unless ($args->{'address'} and $args->{'port'}) |
142
|
0 |
10 |
if ($usessl and not $GOT_SSL) |
147
|
0 |
10 |
if defined $usessl |
149
|
0 |
10 |
if $args->{'localaddr'} |
150
|
0 |
10 |
if $args->{'localport'} |
152
|
0 |
10 |
if ($self->{'socket'}) |
157
|
0 |
10 |
if ($self->{'factory'}) |
166
|
10 |
0 |
defined $self->{'address'} ? : |
|
10 |
0 |
defined $self->{'port'} ? : |
175
|
0 |
10 |
if $self->{'timeout'} |
188
|
0 |
0 |
if ($self->{'usessl'} and $GOT_SSL) |
191
|
0 |
0 |
if ($@) |
218
|
1 |
9 |
if (defined $client_infilter or defined $client_outfilter) { } |
|
0 |
9 |
elsif (defined $client_filter) { } |
223
|
0 |
0 |
if (defined $client_filter) |
242
|
0 |
2 |
if (ref $filter eq 'ARRAY') { } |
|
2 |
0 |
elsif (ref $filter) { } |
245
|
0 |
0 |
if (_test_filter($filter)) { } |
255
|
0 |
0 |
if (_test_filter($filter)) { } |
271
|
0 |
0 |
if (not $eval and $@) |
283
|
0 |
0 |
if $self->{'debug'} |
297
|
0 |
0 |
unless $self->{'socket'} |
309
|
0 |
9 |
unless $self->{'socket'} |
310
|
0 |
9 |
if ($^O =~ /(cygwin|MSWin)/) |
328
|
0 |
1 |
unless $self->{'socket'} |
337
|
0 |
18 |
unless $self->{'socket'} |
338
|
6 |
12 |
if ($self->{'BUFFER'}) |
340
|
2 |
4 |
unless ($item) |
348
|
12 |
0 |
unless ($self->{'_quit'}) |
365
|
12 |
0 |
unless $self->{'alias'} |
374
|
0 |
1 |
unless (@events) |
382
|
1 |
0 |
unless /^_/ |
385
|
1 |
0 |
unless ($self->{'sessions'}{$sender_id}{'refcnt'}++ or $session == $sender) |
398
|
0 |
2 |
unless (@events) |
412
|
2 |
0 |
unless /^_/ |
414
|
0 |
2 |
unless ($blah) |
418
|
2 |
0 |
if (--$self->{'sessions'}{$sender_id}{'refcnt'} <= 0) |
420
|
2 |
0 |
unless ($session == $sender) |
432
|
10 |
0 |
if (--$self->{'sessions'}{$session_id}{'refcnt'} <= 0) |
434
|
10 |
0 |
unless $session_id eq $testd_id |
470
|
0 |
14 |
unless $self->{'socket'} |
471
|
0 |
14 |
unless $output |
473
|
2 |
12 |
if (ref $output eq 'ARRAY') |
475
|
2 |
0 |
if scalar @{$output;} |
476
|
2 |
0 |
if defined $first |