Net::FTPSSL执行文件操作时出现Unexpected EOF错误求助

我之前也碰到过类似Net::FTPSSL和某些FTP服务器的兼容性问题，结合你描述的情况（TLS登录正常但ls/put/get报错，原生FTP、FileZilla却能正常运行），可以从这几个方向排查和解决：

1. 强制启用被动模式（最常见原因） #

很多现代FTP服务器（尤其是带防火墙/NAT的环境）只支持被动模式，而Net::FTPSSL的默认行为可能因版本不同存在差异。你可以在登录后强制开启被动模式：

use Net::FTPSSL;

# 初始化连接
my $ftp = Net::FTPSSL->new('your-web-server.com',
    Port => 21,
    Debug => 1,  # 保留调试日志方便排查
    SSL => 1,    # 显式TLS模式（对应FileZilla的FTPES）
    SSL_verify_mode => 0,  # 若服务器证书未验证，临时关闭；生产环境建议修复证书
) or die "连接失败: $@";

# 登录
$ftp->login('your-username', 'your-password') 
    or die "登录失败: " . $ftp->message;

# 关键：强制切换到被动模式
$ftp->pasv(1);

# 测试ls命令
my @files = $ftp->ls() 
    or die "LS命令执行失败: " . $ftp->message;

print "服务器文件列表:\n" . join("\n", @files);

$ftp->quit;

如果被动模式还是有问题，可以尝试启用EPSV（扩展被动模式）：

$ftp->epsv(1);

2. 开启TLS会话复用 #

部分FTP服务器要求命令通道和数据通道使用同一个TLS会话，Net::FTPSSL默认可能未开启这个选项，你可以在初始化时添加参数：

my $ftp = Net::FTPSSL->new('your-web-server.com',
    # 其他参数...
    SSL_reuse_ctx => 1,
);

3. 匹配服务器支持的TLS版本 #

有些老旧服务器只支持TLS 1.0/1.1，而Net::FTPSSL默认可能使用更高版本的TLS协议，导致数据通道握手失败。你可以指定兼容的TLS版本：

use IO::Socket::SSL;

# 在创建FTP对象前设置默认SSL版本
IO::Socket::SSL::set_defaults(
    SSL_version => 'TLSv1_1',  # 可根据服务器支持情况调整为TLSv1/TLSv1_2
);

# 后续初始化FTP对象的代码不变

4. 对比FileZilla的连接参数找差异 #

仔细看你提供的FileZilla追踪信息，重点确认这几个参数，然后在Net::FTPSSL中对应配置：

• 是否启用了UTF-8编码：如果FileZilla开启了，Net::FTPSSL添加Utf8 => 1参数
• 数据连接的加密策略：若FileZilla用"仅允许加密"，确保Net::FTPSSL没有禁用数据通道加密
• 是否使用MLSD命令：有些服务器偏好MLSD而非LIST，你可以尝试用$ftp->dir()代替$ftp->ls()测试

5. 检查调试日志的细节 #

对比Net::FTPSSL的调试日志和FileZilla的日志，重点看：

• 数据通道的建立过程（比如PASV返回的端口是否能正常连接）
• 数据通道的TLS握手是否成功
• 命令发送的格式是否和FileZilla一致（比如是否带了正确的参数）

如果以上方法都不行，可以把Net::FTPSSL的调试日志和FileZilla的日志做逐行对比，找出差异点，通常就能定位到问题所在。

内容的提问来源于stack exchange，提问作者pointonn