Shell命令裏面的Perl腳本

Question

所有

我有以下shell命令工作按上殼預期，但不工作裏面的perl調用

Shell命令時：

grep -P -s -irl --include \*.v "\s+hello\s?[(].*" <PATH> 

做工精細

Perl內部：

$inst_search = `grep -P -s -irl --include \*.v "\s+$inst\s?[(].*" @plt_dirs`; 

無法正常工作

我懷疑我在grep裏面缺少正則表達式的東西。請糾正我！

感謝， 維韋克

Answer 1

當使用字符串調用exec/system/qx（或反引號）時，Perl將轉義特殊的外殼字符。

嘗試使用exec或系統函數，但傳遞一個列表，例如

system('grep', '-P', '-s', '-irl', '--include', '\*.v', '"\s+hello\s?[(].*"', @plt_dirs); 

您可能還想看看爲您執行一些錯誤處理的模塊，如IPC :: System :: Simple。

Answer 2

試試這個：

$inst_search = qx#grep -P -s -irl --include \*.v "\s+$inst\s?[(].*" @plt_dirs#; 

或爲引用使用任何其他非字母數字字符，而不是"#"。