指令: =~相配運(yùn)算符
說明:這是Perl語言中特有的語法,通常會和文字處理模式來作運(yùn)算。

范例:
　　print"請輸入一個字符串!n";
　　$string=<>;　#<>代表標(biāo)準(zhǔn)輸入,會讓使用者輸入一字符串
　　chop($string);　　#將$string最后一個換行的字符n刪除掉
　　if($string=~/cgi/){ 　
　　　print"輸入的字符串中有cgi這個字符串!n";
　　}
　　如果輸入的字符串中含有cgi這個字符串的話,就會顯示出這個信息。
　 --------------------------------------------------------------------------

指令:!~不相配運(yùn)算符
說明:這也是Perl語言中特有的語法,通常會和文字處理模式來作運(yùn)算。

范例:
　　print"請輸入一個字符串!n";
　　$string=<>;　#<>代表標(biāo)準(zhǔn)輸入,會讓使用者輸入一字符串
　　chop($string);　　#將$stdng最后一個換行的字符n刪除掉
　　if($string!~/cgi/){
　　　　print"輸入的字符串中沒有cgi這個字符串!n";
　　}
　　如果輸入的字符串中沒有含有cgi這個字符串的話,就會顯示出這個信息。
　 --------------------------------------------------------------------------

指令:tr轉(zhuǎn)換函數(shù)
語法:tr/SEARCHLIST/REPLACELIST/
　　其中SEARCHLIST是要轉(zhuǎn)換的字符,REPLACELIST是轉(zhuǎn)換成何種字符。
說明:tr(translate)就是轉(zhuǎn)換的意思,會把符合轉(zhuǎn)換的字符轉(zhuǎn)換成要轉(zhuǎn)換的字符。

范例一:
　　$string="test1ng";
　　$string=~tr/et/ET/;#此時$string="TEsTing";
　　$string=~tr/a-z/A-Z/;#此時$string="TESTING";

范例二:
　　$string="CGI+Perl";
　　$string=~tr/+//;#此時$string="CGI Perl";
　　在傳送CGI數(shù)據(jù)的時候會先將數(shù)據(jù)編碼,其中會將空白的字符轉(zhuǎn)成+這個字符,所以 在
解碼的時候要把+這個字符還原成空白的字符。
　 --------------------------------------------------------------------------