當我嘗試執行日期時出錯

Question

我正在運行此perl腳本（開放源代碼項目的一部分，不是由我寫的），它死在我身上。下面是代碼的相關部分：

$enddate = `date`; 

我收到的錯誤：

Can't exec "date". 

是否與Perl版本的問題嗎？或殼？

Answer 1

如果你只是想要當前的日期/時間，那麼你不需要掏出日期命令。

use POSIX qw(strftime); 

my $date_time = strftime('%F %T', localtime()); 
print "$date_time\n"; 

POSIX是一個核心模塊，所以如果你有Perl，你應該有POSIX。有關日期格式字符串的詳細信息，請參閱strftime手冊頁。

您還沒有真正給我們足夠的信息來診斷反向運行日期問題。如果我試圖診斷它，我可能會使用像strace這樣的工具，但可能無法用於您的平臺。

Answer 2

當Perl的被要求執行一個外殼命令（無論是通過exec，system，readpipe/qx /反引號或open），以及外殼命令包含除空白字符其他無殼元字符，Perl將執行該命令本身，而不是調用一個shell。

如果Perl無法執行程序並啓用警告，Perl會發出警告說程序無法執行，以及原因。

$ perl -we'`non-existent`' 
Can't exec "non-existent": No such file or directory at -e line 1. 

您似乎誤述了您收到的消息。您遺漏的部分是date無法執行的原因。例如，「沒有這樣的文件或目錄」就表示程序在您的路徑中找不到。

---

無論如何，真的不需要執行date。以下是等效的：

use POSIX qw(strftime); 

my $enddate = strftime('%a %b %e %H:%M:%S %Z %Y', localtime()) . "\n";