perl里面eq和==有什么区别？

[qxxat2007]

今天编程，遇到一个逻辑判断的问题，$a==$b 和 $a eq $b可能得到不同的bool值，请教大家，perl里面eq和==有什么区别？

[bugs2k]

貌似 eq 按字符串比较，== 按数字比较

[qxxat2007]

[Quote=引用 1 楼 的回复:]

貌似 eq 按字符串比较，== 按数字比较
[/Quote]

哦？我做的一个测试，$a1 = 0; $a2 = 0; $b1 = 0000D0EF1A5C866991B38A1B6940B490;$b2 = 0000F310E80B9AEED88F65F03A67CB38
if(!($a1 == $a2)&&($b1 == $b2)){}#结果if判断的值为0
而把==改写为eq，则if判断为1；很多测试数据，目前发现这一组有问题

[bugs2k]

貌似你的例子有问题吧？
给出完整的代码、正确的输入、输出

[qxxat2007]

[Quote=引用 3 楼 的回复:]

貌似你的例子有问题吧？
给出完整的代码、正确的输入、输出
[/Quote]

唔。原始数据比较麻烦，我自己再测试一下，有了答案回来贴上

[zydscaline]

[Quote=引用 2 楼 的回复:]
引用 1 楼 的回复:

貌似 eq 按字符串比较，== 按数字比较


哦？我做的一个测试，$a1 = 0; $a2 = 0; $b1 = 0000D0EF1A5C866991B38A1B6940B490;$b2 = 0000F310E80B9AEED88F65F03A67CB38
if(!($a1 == $a2)&&($b1 == $b2)){}#结果if判断的值为……
[/Quote]$b1和$b2是字符吧,用eq啊

[锆前辈]

eq 是字符串比较，== 是数字比较，两者都代表相等的意思，所用于上下文不一样。

[senduo]

eq　比较字符串
== 比较数字

[手无护鸡之力]

我知道Tcl的：

if { 0 eq 0.0 } {
   puts Yes
}
无输出
if { 0 == 0.0 } {
    puts Yes
}
输出Yes

[xiyoulaoyuanjia]

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.

测试下应该没问题的~~

[Gloveing]

Perl字符串比较，不要用==,要用eq
即使是整形，也尽量用eq,少用==
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.

[shijinpeng_2012]

在perl 里面 == 号是整数比较操作符，eq是字符串的比较。