perl的比较字符串与“==”

Question

在Perl中，应该比较两个字符串与“EQ”或“呢”等

我有点惊讶下面的代码片段将打印“是”。

$str = "aJohn"; 
$x = substr($str, 1); 
if ($x == "John") { 
    print "yes\n"; 
} 

我的Perl在Ubuntu上有版本v5.18.4。

是否有两个字符串上的“==”与“eq”产生不同结果的情况？ 谢谢。

Answer 1

"foo" == "bar"为真。 "foo" eq "bar"是错误的。

原因为：==是数字比较。 "foo"和"bar"都在数值上评估为0（如"17foo"的数值评估为17）;自0 == 0，"foo" == "bar"。这通常不是您正在查找的操作。