Perl 字符串和 < & >运营商

Question

对于比较字符串，通常使用 lt、gt 等。

当我使用数字运算符比较字符串时，perl 到底做了什么？ (<, >)

my $str1 = 'Joe';
my $str2 = 'flight';

我猜当执行 $str1 gt $str2 perl 时会比较 ASCII 代码(?)，但是当我执行以下操作时会发生什么：

$str1 > $str2

谢谢

Answer 1

首先你得到一个警告：

Argument "flight" isn't numeric in numeric lt (<) at 
Argument "Joe" isn't numeric in numeric lt (<) at

然后perl将这些字符串转换为整数，这样它们就变成0，然后比较就完成了。

Answer 2

对于 Perl 来说，10 就是 10，无论它存储为字符串 (PV)、有符号整型 (IV)、无符号整型 (UV) 还是浮点数 (NV)。

<、> 和 == 比较其操作数的数值。那么不是数字的东西的数值为零*，因此 flight 的数值为零（有警告），Joe 的数值为零（有警告），所以它们是平等的。

另一方面，字符串 10 的数值是 10，字符串 2 的数值是 2，因此

10 >= 2       # True
'10' >= '2'   # True

10 ge 2       # False (ord('1') is less than ord('2'))
'10' ge '2'   # False

* — 对象可以覆盖它，并且数值引用的地址是引用值的地址。

Answer 3

what exactly perl does when I compare strings using numerical operators? (<, >)

perl 在比较之前将字符串转换为数字。

您的两个示例字符串都转换为零。

but what happens when I do the following:
$str1 > $str2

它们根据“整理顺序”（通常按字母顺序）进行比较，
就像在电话簿中一样对字符串进行排序。

'barney' < 'bammbam'

是假的：

compare 1st letters - tied
compare 2nd letters - tied
compare 3rd letters - "m" comes before "r", so the comparison is false.