perl學習之HERE文檔

標籤：

Perl的here文檔機制是從UNIX shell中的here文檔機制派生而來的。

和在shell中一樣，Perl中的here文檔也是面向行的參考資料表單，要求提供<<運算子，其後跟隨一個初始的終止字串。

<<之後可以不出現空格。

如果終止字串沒有加上引號或雙引號，則允許執行Variant 運算式。

如果終止字串上加了單引號，則不執行Variant 運算式。使用者應當把文本的第一行內容插入到第一個和最後一個終止字串之間。

最後一個終止字串必須位於該行上，且周圍不允許出現空白字元。

與UNIX shell不同的是，Perl不允許在here文檔中執行命令替換。

另一方面，如果將終止字串包含在反引號中的話，Perl也允許在here文檔中執行該命令。

#!/bin/perl $price=100;

1 print <<EOF; # No quotes around terminator EOF are same # as double quotes

2 The price of $price is right. # Variables are expanded

3 EOF

4 print <<‘FINIS‘;

5 The price of $price is right. # The variable is not expanded # if terminator is enclosed in single quotes

6 FINIS

7 print << x 4; # Prints the line 4 times

8 Christmas is coming! # Blank line is necessary here as terminating string

9 print <<‘END‘; # If terminator is in backquotes, # will execute UNIX commands

10 echo hi there

11 echo -n "The time is "

12 date

13 END

(Output)

2 The price of 100 is right.

5 The price of $price is right.

8 Christmas is coming!

Christmas is coming!

Christmas is coming!

Christmas is coming!

10 hi there The time is Fri Nov 3 17:03:46 PST 2000

【責任編輯：雲霞 TEL：（010）68476606】

回書目   上一節   下一

perl學習之HERE文檔