perl腳本。試圖強行後綴來創建的文件

Question

我收到了一些答案，我剛纔的問題的名稱（謝謝大家誰回答）最合適的幸福 -

perl -ne 'BEGIN{$/ = \2769} print {open $f, ">", ++$i; $f } $_' $DATAPATH/data/TRI001MSX. 

這將創建一個編號命名1數據集，2,3,4,5 ... N。

我希望它創建帶有後綴的文件，例如x1，x2，x3，x4 ... xn。

任何援助感激地接受。

Answer 1

如果您看一下open() documentation開頭的示例，您將看到文件名是open()的第三個參數。

目前這只是一個遞增的數字（++$x）。要更改此名稱以便您的文件名具有固定的前綴，這只是將您的固定字符串與遞增數字連接起來的一種情況。 Perl的連接運算符是一個點（.）。

所以你open()調用將變成：

open $f, ">", 'X' . ++$i;