三常规表达式(RegularExpresion)相关的运算符及函数
在perl程序写作中常会用到=~和!~这两个运算符及s和t这二个函数来和常规表达式/pattern/搭配而成一个运算式,如果能够活用这些指令的话,就可以很。轻易地来处理一些字符串,当然在CGI程序设计中了就更能得心应手了。现在就让作者来介绍这些运算符及函数的用法:
--------------------------------------------------------------------------------
指令:/pattern/文字运算
说明:如果在文字运算中没有使用=~或是!~运算符指定一个字符串来做运算的话,就会使用内定的输出变量
范例一:
$string="chmod711cgi";
$string=~/(\W)\s (\d )/;
第一个(\W )是代表找寻数个字母,并将的找到的字符串指派给$1这个变量,而\s 代表找寻多个空白的字符串,最后(\d )代表找寻个数值,并将所找到的字符串指派给$2这个变量。所以
$1="chmod";$2=711;但是$string还是等于原来的字符串,没有改变。
范例二:
/(\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