我在Perl中編寫了一個腳本來將圖像移動到可在PC上正常工作的網絡共享驅動器。當我嘗試在Mac上運行它時,我收到的都是錯誤消息。我無法弄清楚是什麼導致了這個問題。腳本無法在Mac上運行會有什麼原因嗎?我使用File :: Copy和File :: Find來移動這些文件。Perl腳本無法在Mac上工作
這是錯誤消息我得到:
複製失敗:在「腳本的位置」行沒有這樣的文件或目錄14
任何幫助將是巨大的。謝謝。 :)
use File::Copy;
use File::Find;
my @source = qw (source/location);
my $target = q{//share/drive/location};
while (1)
{ sleep (10);
find(
sub {
if (-f) {
print "$File::Find::name -> $target";
copy($File::Find::name, $target)
or die(q{copy failed:} . $!);
}
},
@source
);
}
我認爲「腳本的位置」是你在複製郵件時改變的,它實際上是說'/ path/to/your/script'? – Schwern
我在想同樣的事情。是否可以在這裏發佈腳本或腳本的相關部分供其他人查看? – JakeGould
我已經添加了腳本。如果我嘗試使用代碼在我放置在Mac桌面上的兩個文件夾之間進行復制,則代碼完美無缺。只是當我嘗試將代碼複製到共享驅動器位置時,它不起作用。當我在PC上運行此腳本時,它將複製到共享驅動器,而不是在Mac上。 – Nightzrain