Perl vergleichen Strings mit „==“

Question

In Perl, sollte man zwei Strings mit „eq“ vergleichen oder „ne“ usw.

Ich bin ein wenig der folgende Code-Schnipsel überrascht druckt „Ja“.

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

Mein Perl hat Version V5.18.4 auf Ubuntu.

Gibt es einen Fall, in dem das "==" auf zwei Strings ein anderes Ergebnis als "eq" ergibt? Danke.

Answer 1

"foo" == "bar" ist wahr. "foo" eq "bar" ist falsch.

Der Grund dafür: == ist numerische Vergleich. "foo" und "bar" werden beide numerisch zu 0 ausgewertet (wie "17foo" wertet numerisch zu 17 aus); seit 0 == 0, "foo" == "bar". Dies ist normalerweise nicht die Operation, nach der Sie suchen.