perl程序设计(十二)

  常用体系函数列表
  指令：print
  语法：print Filehandle LIST
  阐明：这个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
  语法：print Filehandle LIST
  阐明：这个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 换行 new line
  \r 光标换行 return
  \t tab键
  \f 换页 form feed
  \b 退回一格
  \v 垂直tab键
  \a 响铃Bell
  \e escape键
  \007 十进制ASC II码
  \xff 十六进制码
  \c[ 控制字符
  示例： print STDOUT "网上学园\n"; 将"网上学园"加上换行显示在屏幕上.
  语法： print LIST
  阐明： 如果省略Filehandle的话,就会把Filehandle内定为STDOUT.也就是会将
  LIST的数据内容显示在屏幕上.
  示例： $url="www.netease.net/~zmd";
  print "网上学园$url\n";
  在屏幕大将会呈现"网上学园www.netease.net/~zmd",如果想要让双引号内的变
  量失效,可以在变量的前面加上"\"符号.例如： print"网上学园\$url"; 如许它
  就显示："网上学园$url"
  语法： print
  阐明： 同省略Filehandle和LIST的话,就会以STDOUT为Filehandle,并会输入$_
  这个内定输入变量的数据内容. 如果$_变量是一个空字符串的话,就会显示出一
  个空字符串.
  示例： $_="网上学园\n"; print; 就会将"网上学园"加上换行显示在屏幕上
  指令： printf
  语法： printf Filehandle LIST
  阐明： 在perl语言中也提代C语言中printf的语法,用法和C语言中的用法一模
  一样.如果把Filehandle省略的话 ,也一样会把STDOUT当成是内定的Filehandle.
  在为大家先容printf函数之前,先让我们来看看printf函数中变更符号的字符.
  符号 其作用
  %c 字符
  %s 字符串
  %d 整数
  %f 浮整数
  %h 十六进制码
  %o 八进制码
  示例：printf("chomod%d%s\n","711""cgi"); 会将chmod 711 cgi加上换行显
  示于屏幕上。
  指令：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");
  指令：sort
  语法：sort(@array)
  阐明：将数组中的元素由小到大排序，如果要由大到小排序的话，要加上
  reverse这个函数。
  示例：
  @abc=("d","b","c","a"); @abc=sort(@abc); #这时@abc=("a","b","c","d");
  @abc=(reverse sort@abc); #这时@abc=("d","c","b","a"); 这个语法也可以写
  成@abc=(reverse sort(@abc));
  @number=(5,2,10); @number=sort(@number); 下面示例用sort函数来排序数值
  的时，会出差错，因而要用下面到下面这一句。
  @number=(sort{$a<=>$b}@number); #这时@number=(2,5,10);
  指令：length
  语法：length($string)
  阐明：求出字符串$string的字节(bytes)值。
  示例：$string="Perl5"; $size=length($string); #这时$size=5;
  指令：substr
  语法：substr($string,offset,length) offset代表肇始字符的地位,length代
  表引用的字符串长度，如果省略length则代表从肇始值到字符串的末了一个字符
  长度。而offset如果是负值的话，就会从字符串左边开始指定字符。
  示例：
  $s=substr("perl5",2,2); #这时$s="rl";
  $s=substr("perl5",2); #这时$s="rl5";
  $s=substr("perl5",-2,2); #这时$s="er";
  指令：index
  语法：index($string,$substring,position) $substring是要寻找的字符；
  position代表从哪一个地位开始寻找，假如省略position就从头开始找起。
  阐明：前往所要找寻的字符在一字符串$string中的地位，如果在字符串中找不
  到字符的话，则会前往-1这个 值。
  示例：
  $s=index("perl5","p"); #这时$s=0
  $s=index("perl5","l",2); #这时$s=3
  $s=index("perl5","perl"); #这时$s=-1
  指令：push
  语法：push(@array,$string)
  阐明：在数组@array的末了附加新的元素 ($string)到数组@array中。
  示例：@array=("one","two"); push(@array,"three"); #这时
  $@array=("one","two","three")
  指令：pop
  语法：pop(@array)
  阐明：将数组(@array)的末了一个元素删除，并将删除的元素前往。
  示例：@array=("one","two"); $rm=pop(@array); #这时@array=("one");而
  $rm="two";
  指令：unshift
  语法：unshift(@array,$string) 阐明：在数组@array的第一个元素前附加新
  的元素$string到数组@array中。 示例： @array=("one","two");
  unshift(@array,"three"); #这时@array=("three","one","two")
  指令：shift

文章作者: 福州军威计算机技术有限公司
军威网络是福州最专业的电脑维修公司,专业承接福州电脑维修、上门维修、IT外包、企业电脑包年维护、局域网网络布线、网吧承包等相关维修服务。
版权声明：原创作品，允许转载，转载时请务必以超链接形式标明文章原始出处 、作者信息和声明。否则将追究法律责任。

评论加载中... 内容： 评论者： 验证码：