无法将静态 tar 文件提取到自定义目标目录：
########################
#
use strict;
use warnings;
use Archive::Tar;
my $source_path='C:\test\Hotfix.tar';
my $dest_path='C:\test\abc\\';
my $tar=Archive::Tar->new();
$tar->read($source_path);
#$tar->extract();
$tar->extract($source_path, $dest_path );
如果我取消注释#$tar->extract();，上述脚本将完美运行。它将提取到我正在执行的当前目录，但我的要求是提取到$dest_path。你能帮我看看我在哪里做错了吗？
【问题讨论】：
我建议阅读Archive::Tar 的文档。 extract() 的文档是这样说的：
$tar->extract([@filenames])
编写名称与中的任何名称相同的文件 @filenames 到磁盘，根据需要创建子目录。这有可能 在 VMS 下不能很好地工作。在 MacPerl 下，文件的修改 time 将被转换为 MacOS 的零时间，并且适当 将对路径进行转换。但是，每个长度 不检查路径元素以查看它是否长于 MacOS 目前允许（32 个字符）。
如果在没有文件名列表的情况下调用提取，则整个内容 存档的一部分被提取。
所以它根本不支持您尝试使用的参数。它需要零个或一个参数[注意：这是错误的。请参阅下面的更正]。如果您不给它任何参数，它将提取所有文件。如果你给它一个参数，那么它应该是对一组文件名的引用——然后它会尝试从存档中提取这些文件。
我怀疑您对extract_file() 的参数感到困惑。这需要一个可选的第二个参数，该参数可用于给出您希望将提取的文件写入的名称。
更新： 正如下面评论中提到的，我似乎误读了文档。文档中的[...] 表示可选参数，而不是数组引用。
所以实际上，extract() 接受任意数量的参数。如果您将零参数传递给它，它将从存档中提取所有文件。您给它的任何参数都将被视为文件名，它将从存档中提取这些文件。
但是，我仍然正确地说传递给 extract() 的最后一个参数永远不会被解释为提取的目标。
【讨论】：
Archive::Tar extract 不能这样工作。您可以在执行extract 之前将chdir 进入目标目录：
use warnings;
use strict;
use Archive::Tar;
my $source_path = 'C:\test\Hotfix.tar';
my $dest_path = 'C:\test\abc\\';
my $tar = Archive::Tar->new();
$tar->read($source_path);
chdir $dest_path;
$tar->extract();
【讨论】：