Perl 中的比较运算符 [ord]244

在 Perl 语言中，[ord] 运算符用于返回字符串中字符的 ASCII 码值。它接收一个包含单个字符的字符串参数，并返回该字符的数字表示形式。

语法：```
ord EXPR
```

其中：EXPR 是包含单个字符的字符串表达式。

用法：示例 1：
```perl
my $char = 'A';
my $ascii_code = ord($char);
print "ASCII 码值：$ascii_code";
```
输出：
```
ASCII 码值：65
```

示例 2：
```perl
my $str = "Hello World";
my $first_char = substr($str, 0, 1);
my $ascii_code = ord($first_char);
print "第一个字符的 ASCII 码值：$ascii_code";
```
输出：
```
第一个字符的 ASCII 码值：72
```

比较运算符：

[ord] 运算符也可以用作比较运算符。它将两个字符串参数进行比较，并返回一个整数：* 0：如果两个字符串相等。
* -1：如果第一个字符串小于第二个字符串。
* 1：如果第一个字符串大于第二个字符串。

语法：```
EXPR1 EXPR2
```

其中：EXPR1 和 EXPR2 是字符串表达式。

用法：示例 3：
```perl
my $str1 = 'cat';
my $str2 = 'dog';
my $comparison = $str1 $str2;
print "比较结果：$comparison";
```
输出：
```
比较结果：-1
```

因为 "cat" 在字母表中小于 "dog"，所以 [ord] 运算符返回 -1。

注意：* [ord] 运算符对大小写敏感。
* 它可以用来比较字符串中单个字符的 ASCII 码值。
* 也可以用作比较运算符来比较两个字符串的大小。

2025-01-25

上一篇：Perl 中的词法元素 (lexical elements)

下一篇：dbi - Perl 数据库接口