您的位置:首页 >> Web开发 >> CGI技术 >> 正文
CGI技术 RSS
 

Perl常规表达式(2)

http://www.rdxx.com 07年10月09日 00:00 我要投稿

关键词: 表达式 , Perl ,

三常规表达式(RegularExpresion)相关的运算符及函数

  在perl程序写作中常会用到=~和!~这两个运算符及s和t这二个函数来和常规表达式/pattern/搭配而成一个运算式,如果能够活用这些指令的话,就可以很。轻易地来处理一些字符串,当然在CGI程序设计中了就更能得心应手了。现在就让作者来介绍这些运算符及函数的用法:

-------------------------------------------------------------------------------- 

 指令:/pattern/文字运算

  说明:如果在文字运算中没有使用=~或是!~运算符指定一个字符串来做运算的话,就会使用内定的输出变量$_来做/pattern/文字运算。

  范例一:

  $string="chmod711cgi";

  $string=~/(\W)\s (\d )/;

  第一个(\W )是代表找寻数个字母,并将的找到的字符串指派给$1这个变量,而\s 代表找寻多个空白的字符串,最后(\d )代表找寻个数值,并将所找到的字符串指派给$2这个变量。所以

$1="chmod";$2=711;但是$string还是等于原来的字符串,没有改变。

  范例二:

  $_="chmod711cgi";

  /(\W)\s (\d )/;

  因为是把字符串指定给$_这个变量,所以可以不用=~这个运算符就会得到

  $1="chmod";$2=711;而且$_还是等于原来的字符串,没有改变。

  范例三:

  $string="chmod711cgi";

  @list=split(/s /,$string);

  以上一个或是多个空白字符来分割$string这个字符串,这是一个很常用的语法。此时@list=("chmod","711","cgi");

--------------------------------------------------------------------------------

  指令:=~相配运算符

  说明:这是Perl语言中特有的语法,通常会和文字处理来作运算。

  范例:

  print"请输入一个字符串!\n";

  $string=<STDIN>;#<STIDN>代表标准输入,会让使用者输入一字符串

  chop($string);#将$string最后一个换行的字符\n删除掉

  if($string=~/cgi/){

  print("输入的字符串中有cgi这个字符串!\n";

  }

  如果输入的字符串含有cgi这个字符串的话,就会显示出这个信息。

--------------------------------------------------------------------------------

  指令:!~不相配运算符

  说明:这也是Perl语言中特有的语法,通常会和常规表达式来运算。

  范例:

  print"请输入一个字符串!\n";

  $string=<STDIN>;#<STIDN>代表标准输入,会让使用者输入一字符串

  chop($string);#将$string最后一个换行的字符\n删除掉

  if($string!~/cgi/)

  {

  print("输入的字符串中有cgi这个字符串!\n";

  }

  如果输入的字符串中没有cgi这个字符串的话,就会显示出这个信息。

--------------------------------------------------------------------------------

  指令:tr转换函数

  语法:tr/SEARCHLIST/REPLACELIST/

  其中SEARCHLIST是要转换的字符;REPLACELIST是转换成何种字符。

  说明:tr(translate)就是转换的意思,会把符合转换的字符转换成要转换的字符。

  范例一:

  $string="testing";

  $string=~tr/et/ET/";#此时$string="TEsTing";

  $string=~tr/a-z/A-Z/;#此时$stirng="TESTING";

  范例二:

  $string="CGI Perl";

  $string=~tr/ //;#此时$string="CGIPerl";在传送CGI数据的时候会先将数据编码,其中会将空白的字符转成 这个字符。

-------------------------------------------------------------------------------

  指令:s取代函数

  语法:s/PATTERN/REPLACE/eg

  其中

  PATTERN是文字处理(RegularExpresion)的模式;

  REPLACE是代表取代成何种文字模式。

  而g是这个函数最常用的参数,代表要把所有符合文字模式的字符串全部取代,如果省略这个参数的话,则只取代一个符合文字模式的字符串中;

  而加上e这个参数代表要将REPLACE

9 7 3 1 2 4 8 :


 
 
标签: 表达式 , Perl , 打印本文
 
 
  相关资讯
RSS
 
 
 
  热点搜索
 
 
 


Copyright ©2005 - 2008 Rdxx.Com,All Rights Reserved
收藏本页
收藏本站