帮助FTP，然后在Perl中使用Tar

Question

我需要FTP到服务器，tar目录中的所有文件，然后将tar FTP到不同的服务器。

一旦我将tar放在服务器上并不是问题，但是我一直在努力弄清楚如何一起使用Archive :: Tar和Net :: FTP。

Answer 1

您需要使用ssh或类似的东西在远程服务器上提交命令来创建tar文件。您将能够使用Net :: FTP来检索生成的文件。

Answer 2

来自Archive :: Tar的文档：

use Archive::Tar;
my $tar = Archive::Tar->new;
$tar->add_files('file/foo.pl', 'docs/README');
$tar->write('files.tgz', COMPRESS_GZIP);