怎么去判断一个字符串包含另一个字符串呢？具体看下面！

Question

一个字符串如：$str1="20090414095014";$str2="20090414";如果$str1包含$str2，然后在进行下一步操作，这个包含怎么判断？请Perl大侠指教！

Answer 1

可以用index，例如：
$str1="20090414095014";
$str2="20090414";
print index($str1,$str2);
运行结果是：
E:\ygb>perl a.pl
0
如果返回-1表示没有，其实数表示$str2在$str1中的位置

Answer 2

用正则:
if($str1 =~ /$str2/) {
...
}