| line |
true |
false |
branch |
|
13
|
1 |
0 |
unless $Net::FTP::VERSION eq '2.77' |
|
31
|
0 |
0 |
unless @_ == 1 or @_ == 2 |
|
34
|
0 |
0 |
unless ($port) |
|
42
|
0 |
0 |
$listen->sockdomain == 2 ? : |
|
46
|
0 |
0 |
if $ok |
|
56
|
0 |
0 |
if @_ |
|
60
|
0 |
0 |
$ftp->_EPSV && $ftp->message =~ /\(([\x33-\x7e])\1\1(\d+)\1\)/ ? : |
|
68
|
0 |
0 |
if $_[0]->sockdomain == 2 or @_ < 1 or @_ > 2 |
|
74
|
0 |
0 |
if $_[0]->sockdomain == 2 or @_ < 1 or @_ > 2 |
|
82
|
0 |
0 |
if $_[0]->sockdomain == 2 |
|
91
|
0 |
0 |
if (my $port = ${*$ftp;}{'net_ftp_pasv'}) { } |
|
|
0 |
0 |
elsif (my $listen = delete ${*$ftp;}{'net_ftp_listen'}) { } |
|
102
|
0 |
0 |
unless $data |