| |
|
| |
 |
|
perl教学 第十篇 格式化输出之一
|
|
| 日期：2005-7-18 8:46:12 来源:易特网络技术 编辑：黑鹰 点击： |
我们已经见过用print函数将原始的未格式化的文本输出到文件，本章讲述如何用函数write和打印格式来生成格式化的输出。
一、定义打印格式
定义打印格式的关键字为format，语法为：
format formatname =
lines_of_output
.
打印格式名formatname的命名规则与一般变量相同。结束行为一个句号，此行不能有任何其它字符，包括空格，句号必须是该行第一个字符。
打印格式的定义象子程序一样可以放在任何地方，甚至可以放在条件语句中，但是最好把它们集中放在程序的开头或结尾。
二、显示打印格式
打印格式的显示有两步：
1、将系统变量$~设成所要使用的格式
2、调用函数write
例如：
1 : #!/usr/local/bin/perl
2 :
3 : $~ = "myformat";
4 : write;
5 :
6 : format myformat =
7 : ===================================
8 : here is the text i want to display.
9 : ===================================
10: .
结果输出如下：
$ program
===================================
here is the text i want to display.
===================================
$
如果不用$~指定打印格式，perl解释器就假定要使用的格式名与要写入的文件变量同名，在本例中，如果不指定使用myformat，则perl解释器试图使用名为stdout的打印格式。
|
上一篇:perl教学 第十篇 格式化输出之二
下一篇:perl教学 第九篇 关联数组之四
[发送给好友] [打印本页] [关闭窗口] [返回顶部] 转载请注明来源：http://www.iyit.net |
|
| 特别声明： 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。 |
| 责任编辑： 黑鹰 |
投稿作者： 易特网络 |
| 信息来源： 易特网络技术 |
录入时间： 2005-7-18 8:46:12 |
| 浏览次数： |
投稿信箱： shtghy@163.com |
|
|
|
|
