Perl 无法将文件提取或解压到自定义目标目录

无法将静态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\u path
。你能帮我找出哪里出了错吗？
extract
不能那样工作。在执行
提取
之前，您可以将其插入目标目录：

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();

我建议您阅读文档以了解更多信息。
extract（）
的文档说明：

$tar->extract（[@filename]）

写入名称与中的任何名称等效的文件
@文件名到磁盘，根据需要创建子目录。这可能
在虚拟机下工作不太好。在MacPerl下，文件的修改
时间将转换为MacOS的零时间，并适当调整
将对路径进行转换。然而，每一个的长度
未检查路径的元素，以查看其是否长于
MacOS目前允许（32个字符）

如果调用extract时没有文件名列表，则整个内容
所有的档案都被提取出来了

所以它根本不支持您试图使用的参数。它需要零个或一个参数[注意：这是错误的。请参阅下面的更正]。如果不给它任何参数，它将提取所有文件。如果您给它一个参数，那么它将引用一个文件名数组，然后它将尝试从存档中提取这些文件

我怀疑您对
extract\u file（）
的参数感到困惑。这需要一个可选的第二个参数，该参数可用于指定要将提取的文件写入的名称

更新：如下面的评论所述，似乎我误读了文档。文档中的
[…]
表示可选参数，而不是数组引用

实际上，
extract（）
接受任意数量的参数。如果您将零参数传递给它，它将从存档中提取所有文件。您给它的任何参数都将被视为文件名，它将从存档中提取这些文件

但是，我仍然正确地说，传递给
extract（）
的最后一个参数从未被解释为提取的目标。
非常感谢您的输入，上面的chdir命令帮助我实现了我所寻找的解决方案