的部分当成一个运算式,如果没有这个需要的话,就不用加上这个参数了。说明:将符合常规表达式的字符串取成为要取代的字符串
范例一:
$string="i:love:perl";
ring="i*love*perl";
$string=~s/*/ /g;#此时$string="i love perl";
$string=~s/ //g;#此时$string="iloveperl";
上一行也可写成$string=~tr/ //;效果都会一样哦!
$string=~s/perl/cgi;#此时$string="ilovecgi";
范例二:
$string=~s/(love)/＜$1＞/;
第一个()内所找到的字符串变成$1,在这个范例中,会把变量love这个字符串变成＜love＞,此时$string="i＜love＞perl";
$string="iloveperl";
$string=~s(i)(perl)/＜$1＞＜$2＞/;
在这个范例中,会把i变成＜i＞;perl变成＜perl＞，此时$string="＜perl＞love＜i＞"; $string="iloveperl";
$string=~s(\W )/＜$1＞/g;
(/w )代表找寻符合一个或是多个英文字符或是数值的字符串,之后再将找到的字符串设成$1。因为加上g这个参数,所以会找到字符串的这三个英文单字,然后再把这三个单字分加上＜＞这个符号,此时$string="＜perl＞＜love＞＜i＞";
范例三:
$string="www22cgi44";
$string=~s/(\d )/$1*2/e;
(/d )代表要找寻$string中一个或是多个数值的字符串,再将找到的字符串设成$1。加上参数e是代表要把$1*2当作是一个运算式,所以$string="www22cgi44";
$string="www22cgi44";
$string=~s/(\d )/$1*2/eg;
加上参数e,所以会把$1*2当作是一个运算符式来看;加上参数g就会把全部符合数值的字符串经过运算式运算之后再把它取代,所以$string="www44cgi88";
范例四:
假设原本的字符串是$value="三八!",经CGI数据编码之后,这个字符串就会变成
$value="!"。以下是一个解码的示范程序:
$value="!";
$vlaue=~s/(〔a-fA-F0-9〕
〔a-fA-F0-9〕/pack("c",hex($1))/eg;
在传送CGI数据的时候会把数据编码,其中会将特殊字符或是中文字符编码以开头的连续的两个十六进制数的字符串,所以要用s这个函数来找寻这个以开头的字符串。为了要把找到的字符串再做解码的处理,所以要在这个符号之后加上()这个符号,表示会把找到的字符串记忆起来并指定给$1这个变量,而且要在()中加上代表是连续两个十六进制数值的常规表达式(RegularExpression),也就是〔a-fA-F0-9〕〔a-fA-F0-9〕。再用hex这个函数($1是代表符合的字符串)把十六进制数值转成十进制的码,之后再用pack这个函数(以C为参数,是代表unsignedcharvalue的意思)把这个十进制码还原成原来的字符串。最后就会把这个字符串解码成$value="三八!"。值得一提的是也可以把这个解码的程序写成: $value=~s/(..)/pack("C",hex($1))/eg;
