| line |
true |
false |
branch |
|
29
|
4 |
0 |
unless defined &POE::Component::Client::FTP::DEBUG |
|
30
|
4 |
0 |
unless defined &POE::Component::Client::FTP::DEBUG_COMMAND |
|
31
|
4 |
0 |
unless defined &POE::Component::Client::FTP::DEBUG_DATA |
|
149
|
0 |
4 |
if @_ & 1 |
|
154
|
0 |
4 |
unless defined $alias |
|
160
|
3 |
1 |
unless defined $local_addr |
|
163
|
4 |
0 |
unless defined $local_port |
|
166
|
0 |
4 |
unless defined $remote_addr |
|
170
|
0 |
4 |
unless defined $remote_port |
|
173
|
4 |
0 |
unless defined $tlscmd |
|
176
|
4 |
0 |
unless defined $tlsdata |
|
179
|
4 |
0 |
unless defined $timeout |
|
182
|
4 |
0 |
unless defined $blocksize |
|
185
|
3 |
1 |
unless defined $conn_mode |
|
188
|
4 |
0 |
unless defined $trans_mode |
|
197
|
0 |
4 |
unless defined $events and ref $events eq 'ARRAY' |
|
200
|
0 |
41 |
if (ref $opt eq 'HASH') { } |
|
208
|
0 |
4 |
if keys %params |
|
211
|
0 |
4 |
if ($tlscmd or $tlsdata) |
|
217
|
0 |
0 |
if ($@) |
|
315
|
16 |
31 |
if defined $more and $more eq '-' |
|
319
|
16 |
31 |
unless defined $code and defined $more and $more eq ' ' |
|
325
|
3 |
28 |
if ($major == 1) { } |
|
|
24 |
4 |
elsif ($major == 2) { } |
|
|
4 |
0 |
elsif ($major == 3) { } |
|
350
|
31 |
0 |
if $coderef |
|
449
|
0 |
0 |
if ($heap->{'complex_stack'}{'pending'}) |
|
455
|
0 |
0 |
if $heap->{'complex_stack'}{'last_length'} |
|
463
|
0 |
0 |
if (defined(my $line = shift @{$$heap{'complex_stack'}{'sendq'};})) { } |
|
|
0 |
0 |
elsif ($heap->{'data_suicidal'}) { } |
|
507
|
0 |
0 |
unless (@{$heap->{'complex_stack'}{'sendq'};} > 1 or $heap->{'complex_stack'}{'pending'}) |
|
522
|
0 |
0 |
unless (@{$heap->{'complex_stack'}{'sendq'};} > 0 or $heap->{'complex_stack'}{'pending'}) |
|
572
|
0 |
4 |
if ($heap->{'tlscmd'}) { } |
|
579
|
4 |
0 |
if (defined $heap->{'user'} and defined $heap->{'pass'}) |
|
600
|
0 |
0 |
if ($@) |
|
634
|
0 |
4 |
unless defined $heap->{'user'} |
|
635
|
0 |
4 |
unless defined $heap->{'user'} |
|
636
|
0 |
4 |
unless defined $heap->{'pass'} |
|
637
|
0 |
4 |
unless defined $heap->{'pass'} |
|
659
|
0 |
4 |
if ($heap->{'tlsdata'}) { } |
|
703
|
0 |
0 |
if ($heap->{'event'}[0] eq 'PBSZ') { } |
|
788
|
2 |
4 |
if ($heap->{'event'}[0] eq 'PASV') { } |
|
|
1 |
3 |
elsif ($heap->{'event'}[0] =~ /^PORT/) { } |
|
841
|
0 |
3 |
if ($heap->{'tlsdata'}) |
|
843
|
0 |
0 |
if $@ |
|
876
|
2 |
1 |
if ($heap->{'attr_conn_mode'} == 1) |
|
945
|
14 |
3 |
unless @{$heap->{'queue'};} |
|
958
|
3 |
91 |
if ($state eq 'cmd_input' and defined $heap->{'data_rw_wheel'}) |
|
960
|
0 |
3 |
if (substr($code, 0, 1) == 2) |
|
983
|
29 |
7 |
if (exists $heap->{'events'}{$session}{$event} or exists $heap->{'events'}{$session}{'all'}) |
|
1002
|
21 |
3 |
ref $cmd_args eq 'ARRAY' ? : |
|
1005
|
0 |
24 |
unless defined $heap->{'cmd_rw_wheel'} |
|
1007
|
3 |
21 |
unless ref $cmd_args eq 'ARRAY' |
|
1009
|
24 |
0 |
unless defined $state |
|
1013
|
0 |
24 |
if $command eq 'QUOT' |
|
1016
|
11 |
13 |
@$cmd_args ? : |
|
1032
|
21 |
17 |
if $coderef |
|
1040
|
2 |
1 |
if ($heap->{'attr_conn_mode'} == 1) { } |
|
1056
|
0 |
1 |
if $addr eq '0.0.0.0' |
|
1087
|
3 |
0 |
unless $heap->{'pending_complex_cmd'} |