如何在Perl中通过FTP(使用TLS加密)删除文件而不删除目录?

时间:2014-02-11 21:46:56

标签: perl ssl encryption ftp robust

我目前正在使用Net :: FTPSSL :: Robust使用TLS加密遍历一堆服务器的目录。我想下载文件,然后在下载时删除它们。我不想删除文件夹名称。

问题是,Robust只有一个get(),它不会删除它所需的文件。我知道必须有办法做到这一点。正如你在这里看到的,删除不起作用,因为它不是Net :: FTPSSL :: Robust的一部分,虽然它是Net :: FTPSSL的一部分:

my $ftp = Net::FTPSSL::Robust->new
( Host    => $server->{'ip_address'}->{content}
, Port    => $port
, SECURITY_TLS => $encryption
, user  => $server->{'username'}->{content}
, password  => $server->{'password'}->{content}
, login_attempts => 3
);

$local_dir = $server->{'local_directory'}->{content} if($server->{'local_directory'}->{content});

# when needed, many attempts will be made to retrieve all
$ftp->get("/", "".$local_dir);
$ftp->delete("/") 

任何人都可以对此有所了解或有更好的解决方案吗?我是Perl的新手,所以提前谢谢。

1 个答案:

答案 0 :(得分:-1)

为什么不使用Net :: FTPSSL或Net :: SSLGlue :: FTP而不是Net :: FTPSSL :: Robust?您是否需要Net :: FTPSSL :: Robust中的其他模块不提供的任何特殊功能?