在目录中查找文件并使用Perl脚本解压缩文件

Question

这里所有专家的另一个问题。我这里有一个Perl脚本，我的目的是找到文件并untar。但是当我执行这条线时，就会发生这样的事情。

my $bundle = "`awk -F \'=\' \'{print \$2}\' config.txt`";
my $bundlename = `awk -F \'=\' \'{print \$2}\' config.txt | awk -F \'/\' \'{print \$11}\'`;

print $output;

 system ("wget $bundle");
 print "$bundlename\n";

 my $cd = `tar -xzvf $bundlename`;

任何人都可以帮助我吗？查找文件的正确脚本是什么，找到文件后将提取文件tar.gz

代码的背景。我有一个配置文件，其中包含下载文件的地址，然后如果文件在机器中完成下载，$ bundlename变量将找到打印文件的名称，之后$cd变量将提取找到文件名后找到文件。