perl - 添加字符文字 perl（非常简单）

Question

如果有人想要一些快速的代表，你去:)。

如何像在 C 中那样添加字符文字。例如

 print 'A' + 1

上面应该打印 'B' 因为 ASCII 'A' + 1 给出 ASCII 'B'

Answer 1

chr(ord('A') + 1). Perl 没有字符类型，它有一个字符串类型。并且字符串在数字上不表现为 ASCII 值。您想ord将其转换为数字代码点并将chr其转换回来。

Answer 2

如果将字符串存储在变量中，则可以递增它们。

$ perl -E'$a = "A"; say ++$a'
B

$ perl -E'$a = "abacaa"; say ++$a'
abacab

$ perl -E'$a = "Z"; say ++$a'
AA