perl中==操作和eq操作区别

Quoted from perldoc:

Binary "==" returns true if the left argument is numerically equal to the right argument.  
Binary "eq" returns true if the left argument is stringwise equal to the right argument.  

实际上也就是说==返回是是否数值相等，而eq返回的是字符相等。

Perl code

$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

实际上也就是说==返回是是否数值相等，而eq返回的是字符相等