Perl常用系统函数指令:print 语法:printFilehandleLIST 说明:这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写出的动作.STDIN是代表从哪连输入数据,例如从电脑的键盘输入;STDOUT是代表从哪连输出数据;例如从电脑的屏幕输出;STDERR是代表从哪连输出错误的数据,例如从电脑的屏幕输出.而在PERL语言中有三个标准FILEHANDLE:1.STDIN(标准输入):是代表STDIN的FILEHANDLE 2.STDOUT(标准输出):是代表STDOUT的FILEHANDLE 3.STDERR(标准错误输出):是代表STDERR的FILEHANDLE如果要使用其他FILEHANDLE的时候,就要用OPEN这个函数来打开一个FILEHANDLE,我们可以用PRINT这个函数LIST的数据输出给FILEHANDLE. 在为大家介绍PRINT这个函数之前,先让我们来看看PRINT函数中特殊打印字符: 指令:# 说明:注释符号Remark宣告 示例:#这是一个注释说明 -------------------------------------------------------------------------------- 指令:print 语法:printFilehandleLIST 说明:这个Filehandle可以看作在I(INPUT)/O(OUTPUT)之间的一个桥梁,可以利用FILEHANDLE来做出数据读入写出的动作.STDIN是代表从哪连输入数据,例如从电脑的键盘输入;STDOUT是代表从哪连输出数据;例如从电脑的屏幕输出;STDERR是代表从哪连输出错误的数据,例如从电脑的屏幕输出.而在PERL语言中有三个标准FILEHANDLE:1.STDIN(标准输入):是代表STDIN的FILEHANDLE 2.STDOUT(标准输出):是代表STDOUT的FILEHANDLE 3.STDERR(标准错误输出):是代表STDERR的FILEHANDLE如果要使用其他FILEHANDLE的时候,就要用OPEN这个函数来打开一个FILEHANDLE,我们可以用PRINT这个函数LIST的数据输出给FILEHANDLE. 在为大家介绍PRINT这个函数之前,先让我们来看看PRINT函数中特殊打印字符: 符号其作用 n换行newline r光标换行return ttab键 f换页formfeed b退回一格 v垂直tab键 a响铃Bell eescape键 007十进制ASCII码 xff十六进制码 c〔控制字符 示例:printSTDOUT"网上学园n";将"网上学园"加上换行显示在屏幕上. 语法:printLIST 说明:如果省略Filehandle的话,就会把Filehandle内定为STDOUT.也就是会将LIST的数据内容显示在屏幕上. 示例:$url="www.netease.net/~zmd"; print"网上学园$urln"; 在屏幕上将会出现"网上学园www.netease.net/~zmd",如果想要让双引号内的变量失效,可以在变量的前面加上""符号.例如:print"网上学园$url";这样它就显示:"网上学园$url" 语法:print 说明:同省略Filehandle和LIST的话,就会以STDOUT为Filehandle,并会输出$_这个内定输出变量的数据内容.如果$_变量是一个空字符串的话,就会显示出一个空字符串. 示例:$_="网上学园n";print;就会将"网上学园"加上换行显示在屏幕上 -------------------------------------------------------------------------------- 指令:printf 语法:printfFilehandleLIST 说明:在perl语言中也提代C语言中printf的语法,用法和C语言中的用法一模一样.如果把Filehandle省略的话,也一样会把STDOUT当成是内定的Filehandle.在为大家介绍printf函数之前,先让我们来看看printf函数中变换符号的字符. 符号其作用 c字符 s字符串 d整数 f浮整数 h十六进制码 o八进制码 示例:printf("chomoddsn","711""cgi");会将chmod711cgi加上换行显示于屏幕上。 -------------------------------------------------------------------------------- 指令:chop语法:chop($url) 说明:把最后一个字符删除。 示例:$url="www.nease.net/~zmd/"; chop($url);这时$url="www.nease.net/~zmd"而这两行也可以写成chop($url="www.nease.net/~zmd/"); -------------------------------------------------------------------------------- 指令:split 语法:split(/pattern/,$text,limit)其中/pattern/是文字处理的模式,而limit是代表要分割的个数,一般可以省略。 说明:用一个指定的文字处理模式来分割$text字符串。 示例: $text="Michael,Gevin,Mike";@name=split(/,/,$text);#这时@name=("Michael","Gevin","Mike"); ($a,$b,$c)=split(/,/,$text);#这时$a="Michael";$b="Gevin";$c="Mike"; @name=split(/,/,$string,2);#这时@name=("Michael","Gevin"); 在传送CGI应用程序数据的时候会先将数据编码,其中会将FORM中第个数据字段的数据内容用&这个符号隔开,所以在解码的时候就要以&这个符号为分割的字符,将每个数据字段分割出。例如:$text="Mike=A&Michael=B"; @name=split(/&/,$text);#这时@name=("Mike=A","Michael=B");而数据字段的名称和这个数据字段的值是用=这个符号来隔开,如果想取得数据字段的名称和所对应的值的话,就用要=这个符号来分割数据字段,例如:$name=""Mike=Michael""; ($name1,$name2)=split(/=/,$list);#这时$name1="Mike";$name2="Michael"; -------------------------------------------------------------------------------- 指令:keys 语法:keys(array) 说明:取出关联数组ARRAY中全部的key。 示例:NAME=(1,"mike",2,"michael");@readkey=keys(NAMES);#这时@readkey=(1,2); -------------------------------------------------------------------------------- 指令:values 语法:values(array) 说明:取出关联数组ARRAY中全部的value。 示例:NAMES=(1,"mike",2,"michael");@readval=values(NAMES);#这时@readval=("mike","michael"); -------------------------------------------------------------------------------- 指令:reverse 语法:reverse(@array) 说明:将数组@array中的元素由后到前重新排列。 示例:@back=("A","B","C","D","E");@back=reverse(@back);#这时@back=("E","D","C","B","A"); -------------------------------------------------------------------------------- 上一篇:没有了 下一篇:Perl的基本输入输出 更多相关文章
|
推荐文章
精彩文章
|