運行Perl腳本

Question

內的shell腳本我有一個包含一個週期包含的Perl腳本文件名：

$zipfile = FS.one.two.$file_date_str.three.1_1.zip; 

其中$file_date_str包含日期YYYYMMDD格式。

我想在本地讀取此文件，然後ftp它到遠程位置。在遠程位置的文件名，它必須與CD.ABCD123.

爲前綴的意義不同，我寫如下行做到這一點：

$filePrefix=CD.ABCD123.; 
$scpcmd = '$myscriptdir/ftpscript $zipfile $filePrefix${zipfile} ${REMOTE_ID}@${REMOTE_SERVER}'; 
print L $scpcmd . "\n"; 
$ret=system($scpcmd); 

ftpscript是UNIX shell腳本文件FTP做偏遠的地點。

我得到下面的錯誤上運行此：

Bareword found where operator expected at my_script_name line 77, near "1_1.zip" 
    (Missing operator before zip?) 
Bareword found where operator expected at my_script_name line 92, near "1_1.zip" 
    (Missing operator before zip?) 
syntax error at my_script_name line 77, near "1_1.zip" 
syntax error at my_script_name line 92, near "1_1.zip" 

我是新來的Perl腳本編程。有人能幫助我在上面做錯什麼嗎？

Answer 1

根據您的示例（顯示已編輯，使其難以排除故障），看起來好像您沒有引用字符串。取而代之的

$zipfile = FS.one.two.$file_date_str.three.1_1.zip; 

嘗試

$zipfile = "FS.one.two." . $file_date_str . ".three.1_1.zip"; 

Answer 2

關注潛行的意見，有關設置zipfile，但你還需要一些更多的改變

變化：

$scpcmd = '$myscriptdir/ftpscript $zipfile $filePrefix${zipfile} ${REMOTE_ID}@${REMOTE_SERVER}'; 

分爲：

$scpcmd = "$myscriptdir/ftpscript $zipfile $filePrefix${zipfile} ${REMOTE_ID}\@${REMOTE_SERVER}"; 

---

順便說一句，一定要注意雙引號字符串中的\@。這是爲了防止perl查找數組。 （例如）"hello @world"將嘗試嵌入名爲world一個數組，只是因爲它會爲"hello $world"