Perl中的块输出用法详解

Perl中的块输出语句在CGI程序中有着极其重要的作用，它可以用来输出一大段HTML代码，或者是在其他的程序中输出固定的块内容。
块输出语句的用法一般为：
print <<_FLAG_;
content ...
....
end of content
_FLAG_
我们来一行一行的解释它的用法:
1.第一行
块输出开始的标志为"print <<_FLAG_;",其中,print是大家都很熟悉的输出语句,"<<"是表明使用块输出,"_FLAG_"是定义的块输出标志为"_FLAG_",这个标志可以任意定义,但是最好定义一个表怪的字符串,以免和内容中的行发生混淆。这一行最后一个字符是分号，是语句结束的标志，这里就不作解释了。
2.第二行至倒数第二行
这里是块输出的具体内容，你要输出的内容就写在这里。
3.最后一行
这行只有很短的一段内容，就是"_FLAG_"。这一行里我们使用前面定义的块标志放在这一行的开始，这样标志着块输出的结束。这里有几个需要注意的问题：
（1）标志必须放在行开头。
（2）标志后面不能有任何字符，包括语句结束符号——分号。

上面介绍了块输出语句的基本用法，另外还有几个特殊的地方需要注意：
a.输出块内容中可以使用变量替换部分内容，用法和print语句一样，直接在你需要插入变量的地方写上变量的名称。
b.输出块内容中不能包含两个特殊字符——$和@，这两个字符如果包含在输出块内容中时，必须转义，也就是说，要在字符的前面加上""。
c.在同一个文件或函数中，定义的块输出标志不能相同，否则，就会出现难以预料的后果。

以上是我在Perl编程中的一点体会，希望能给大家带来帮助。

原文转自：http://www.ltesting.net