1
私はUbuntuで動作するスクリプトを用意していますが、Windowsで実行したいと思います。私はそれを実行する方法を知っている私はそれが実行されないように私のスクリプトで何が間違っているのか分からない。Windowsでperlスクリプトを実行する
#!/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";
私は 'glob'の後の文字列を言うでしょう。 '@ files'のために使ったのと同じ構文を再利用してみませんか?おそらく ''の部分にバックスラッシュもあります。私はWindows上でテストすることはできません。 –
simbabque
Perlはどんなエラーを投げますか? – PhillipD
警告が表示されませんか? '認識されないエスケープ\ Wが通過しました... ' – toolic