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

Question

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

如何添加像我在C中可以做的字符litterals。例如

 print 'A' + 1

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

Answer 1

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

Answer 2

如果您将字符串存储在变量中，则you can increment them。

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

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

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