perl对字符串的处理
当我们对字符串其中的某部分做截出，替换，删除（不包括搜索）。我们可以想到的用substr,unpack,regex这些方法来做。
如果搜索，那么让我们想到的是index,rindex.
(1)截出
substr
$str="I'm boy,and you?";
$sex=substr($str,4,3);#boy

unpack
$sex=unpack("x4A3",$str);#跳过4字节打印后面3个字符

regex
$str = ~m/(boy)/;#将匹配值存入$1中
print $1;

(2)替换
substr
substr($str,4,3,"girl");
print $str;             #I'm girl,and you?

substr($str,4,3)="girl";
print $str;             #I'm girl,and you?


unpack
无法做到

regex
$str =~ s/boy/girl/g;
print $str;

删除
substr($str,4,3)="";
print $str;         #I'm ,and you?

unpack
无法做到

regex
$str =~ s/boy//g;

print $str;

本文转自hahazhu0634 51CTO博客，原文链接：http://blog.51cto.com/5ydycm/538241，如需转载请自行联系原作者

1、正则表达式（Regular Expression，缩写为regexp，regex或regxp)，又称正规表达式、正规表示式或常规表达式或正规化表示法或正规表示法，是指一个用来描述或者匹配一系列符合某个句法规则的字符串的单个字符串 。