$str1 = "1 -the first str";

$str2 = "1 -the second str";

print "numerically  equal\n" if($str1 == $str2);

print "stringwise equal\n" if($str1 eq $str2);

结果只有numerically equal。 PS:perl会自动转换字符串。$str1 == $str2中的值都是1

Perl字符串比较，不要用==,要用eq