Perl语言编程特殊技巧
工作过程有点复杂。当采用
 Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved 地址(ADD)：厦门软件园二期望海路63号701E（东南融通旁） 邮编(ZIP)：361008 电话：0592-5908028 传真：0592-5908039 咨询信箱：web@lingzhong.cn 咨询OICQ：173723134 《中华人民共和国增值电信业务经营许可证》闽B2-20100024 ICP备案:闽ICP备05037997号
 这可能是一个极端的例子，但是使用一些perl编程技巧，可以将我们的程序长度减少一半。 如果我们仅仅想把STDIN影射到STNOUT，这样做很好。但是如果我们想使我们的程序像unix中的可以打开和打印文件的cat一样时，应该怎么做？我们可能要检查命令行参数，以确定它们是不是有效文件，然后依次打开和打印它们。但是这么一个很平常的事情，perl语言可以使用更简单更短的方法实现。 特殊的文件句柄：<> 像其它的默认变量一样，perl语言的这一写为<>的特殊句柄可以使程序编写更容易。这个文件句柄将所有命令行参数都看作文件名，依次打开它们。如果没有命令行参数，那么就从STDIN读入。像unix中的习惯用法per一样，如果将“-”用作命令行参数，它将会打开STDIN代替一个文件。因此如果我们想编写一个像上面提到的可以支持命令行中的文件的程序，这很简单，可以这样写： print <>; 当你考虑到perl可以仅用8条语句写一个实现cat功能的程序时，你就会明白为什么perl被认为功能强大。但是如果我们想在输入上面实现一些更重要的功能而不是仅仅将其写回显示器上，这该怎样实现？ 记录行数 如果我们想单个处理每一行输入，这时仅将文件句柄连到打印是不够的。让我们看一个在每行输入上加上行号的一个小程序。 $num = 0; while (<>) { $num = $num + 1; print "$numt
Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved 地址(ADD)：厦门软件园二期望海路63号701E（东南融通旁） 邮编(ZIP)：361008 电话：0592-5908028 传真：0592-5908039 咨询信箱：web@lingzhong.cn 咨询OICQ：173723134 《中华人民共和国增值电信业务经营许可证》闽B2-20100024 ICP备案:闽ICP备05037997号
} 在这一例子中我们使用$num变量来记录行号，每输入一行，我们将其加一，然后将行号和输入内容一起输出。当我们在字符串中使用由双引号括起的变量时，这一变量名将会用它的内容来代替，这使得perl中的格式化输出变得轻而易举。 仅这几个简单的程序，我们就可以看出使用特殊变量可让你编写更小更快的程序。如果你感兴趣，perl所有特殊变量的用法可以在perl手册的变量部分得到。 |
||||||||||
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |