Branch Coverage

blib/lib/Test/POE/Client/TCP.pm
Criterion Covered Total %
branch 61 120 50.8


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