如何在windows上用perl调用winrar

是否可以在windows系统上通过perl调用winrar，例如

perl-e“rara-rr10-sc:\backups\backup.rar@backup.lst”

如果是，有没有更有效的方法

---

我在谷歌上查过“perl-e”+winrar，但是没有一个结果给了我一个与我想要的答案非常接近的答案。我运行这个的系统是一个Windows XP系统。我愿意用另一种语言（如python）来做这件事，如果它更容易的话，不过我更喜欢perl

要使用Perl程序中的外部应用程序，请使用内置程序

---

如果需要命令的输出，可以使用backtick（``）或qx运算符，如中所述。也可以使用中讨论的管道

要使用Perl程序中的外部应用程序，请使用内置程序

---

如果需要命令的输出，可以使用backtick（``）或qx运算符，如中所述。也可以使用中讨论的管道

从Perl脚本执行外部命令的一种方法是使用：

---

从Perl脚本执行外部命令的一种方法是使用：

---

您可以使用CPAN模块访问Windows中的RAR设施：

---

您可以使用CPAN模块访问Windows中的RAR设施：

---

我是否仍然需要将env设置为：$env{winrar}=“C:\Program Files\winrar\”；或者，我是否可以跳过使用SYSTEM时的设置：我是否仍需要将env设置为：$env{winrar}=“C:\Program Files\winrar\”；或者我可以跳过这个系统吗

my $cmd = 'rar a -rr10 -s c:\backups\backup.rar @backup.lst';
if (system $cmd) {
    print "Error: $? for command $cmd"
}

use Archive::Rar;
my $rar = Archive::Rar->new(-archive => $archive_filename);
$rar->Extract();