Branch Coverage

blib/lib/POE/Component/Client/TCP.pm
Criterion Covered Total %
branch 75 104 72.1


line true false branch
31 2 82 if @_ & 1
36 2 80 unless exists $param{'RemoteAddress'}
38 2 78 unless exists $param{'RemotePort'}
52 78 0 unless defined $args
53 0 78 unless ref $args eq "ARRAY"
63 0 780 if defined $param{$_} and ref $param{$_} ne "CODE"
75 8 70 if ($using_watermarks > 0 and $using_watermarks != 4)
79 70 0 unless defined $high_event
80 70 0 unless defined $low_event
96 68 2 unless defined $inline_states
99 68 2 unless defined $package_states
102 68 2 unless defined $object_states
104 2 68 unless ref $inline_states eq "HASH"
107 2 66 unless ref $package_states eq "ARRAY"
110 2 64 unless ref $object_states eq "ARRAY"
115 2 62 unless defined $input_callback
123 62 0 unless defined $session_type
124 2 60 if (defined $session_params and ref $session_params) { }
125 2 0 if (ref $session_params ne "ARRAY")
132 0 60 unless defined $address
134 18 42 unless defined $conn_error_callback
135 6 54 unless defined $error_callback
146 42 18 if defined $alias
148 4 56 if $start_callback
165 42 18 if defined $alias
177 0 60 if exists $heap->{'ctimeout_id'}
178 10 50 if defined $ctimeout
185 0 0 if defined $new_address
186 0 0 if defined $new_port
194 10 48 if exists $heap->{'ctimeout_id'}
197 2 56 if ($pre_conn_callback)
198 0 2 unless ($socket = &$pre_conn_callback(@_))
206 0 58 $using_watermarks ? :
226 57 1 if $conn_callback
234 0 2 if exists $heap->{'ctimeout_id'}
244 0 0 if exists $heap->{'ctimeout_id'}
253 18 0 if ($_[3]{'shutdown_on_error'})
261 0 58 if $heap->{'shutdown'}
267 58 2 if $flush_callback
268 4 56 if ($heap->{'shutdown'})
270 4 0 if $disc_callback
279 0 69 if exists $heap->{'ctimeout_id'}
281 58 11 if ($heap->{'connected'}) { }
283 58 0 if (defined $heap->{'server'})
284 54 4 if ($heap->{'got_an_error'} or not $heap->{'server'}->get_driver_out_octets)
289 49 5 if $disc_callback
297 41 28 if defined $alias
315 2 56 if (ref $filter eq 'ARRAY') { }
0 56 elsif (ref $filter) { }
56 0 elsif (not defined $filter) { }
331 0 0 unless ($_[10] eq "read" and $_[11] == 0 || $_[11] == 104)
341 0 0 unless $errno