指令: =~相配運算符 說明:這是Perl語言中特有的語法,通常會和文字處理模式來作運算。
范例: print"請輸入一個字符串!n"; $string=<>; #<>代表標準輸入,會讓使用者輸入一字符串 chop($string); #將$string最后一個換行的字符n刪除掉 if($string=~/cgi/){ print"輸入的字符串中有cgi這個字符串!n"; } 如果輸入的字符串中含有cgi這個字符串的話,就會顯示出這個信息。 --------------------------------------------------------------------------
指令:!~不相配運算符 說明:這也是Perl語言中特有的語法,通常會和文字處理模式來作運算。
范例: print"請輸入一個字符串!n"; $string=<>; #<>代表標準輸入,會讓使用者輸入一字符串 chop($string); #將$stdng最后一個換行的字符n刪除掉 if($string!~/cgi/){ print"輸入的字符串中沒有cgi這個字符串!n"; } 如果輸入的字符串中沒有含有cgi這個字符串的話,就會顯示出這個信息。 --------------------------------------------------------------------------
指令:tr轉換函數 語法:tr/SEARCHLIST/REPLACELIST/ 其中SEARCHLIST是要轉換的字符,REPLACELIST是轉換成何種字符。 說明:tr(translate)就是轉換的意思,會把符合轉換的字符轉換成要轉換的字符。
范例一: $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數據的時候會先將數據編碼,其中會將空白的字符轉成+這個字符,所以 在 解碼的時候要把+這個字符還原成空白的字符。 --------------------------------------------------------------------------
|