在Windows上运行perl脚本

我有一个在Ubuntu中运行的脚本，但我想在windows中运行它。我知道如何执行它，我只是不知道我的脚本有什么问题，不让它运行

#!/usr/bin/perl

use strict;
use warnings;
use IO::Compress::Zip qw(zip $ZipError);
use File::Find;

my @files = <C:\Windows\*.log>;

zip [ @files ] => 'Desktop/output.zip'
    or die "zip failed: $ZipError\n";

unlink glob "'C:\Windows\*.log'";
print "The job is done\n";

#/usr/bin/perl
严格使用；
使用警告；
使用IO:：Compress:：Zip qw（Zip$ziperor）；
使用File：：Find；
我的@files=；
zip[@files]=>“Desktop/output.zip”
或“zip失败：$ziperor\n”；
取消链接glob“'C:\Windows\*.log'；
打印“作业已完成\n”；

试试这个：

my @files = glob 'C:/Windows/*.log';

及

---

显式调用

glob

优于

，使用

/

而不是

\

可以简化引用。

我会说

glob

后面的字符串。为什么不重新使用用于

@文件的相同语法？也可能是
部分中的反斜杠。我无法在Windows上测试。Perl会抛出什么错误？
unlink glob 'C:/Windows/*.log';