perl - perl 中 "\c"的用途是什么？

Question

\c 在 perl 中有什么作用？我试着到处寻找它，但与其他语言相比，对 perl 的支持并不好。我看到的所有地方都表明它是一个控制语句，它的语法是\cX，其中 x 可以是任何字符。但这并不能说明什么。那么谁能解释一下它的作用和使用方法？

Answer 1

^{将评论转移到答案。}

尝试:

perl -l -e 'print "\cC"'

它打印一个 control-C 和一个换行符(您可能需要将其通过管道传输到 od -c 或 xxd -g 1 或一些类似的数据转储程序)。现在你认为 '\cX' 是什么意思？

文档没有规定只按字母顺序，因为ASCII码集中有@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_作为连续的字符码，可以使用，例如:

perl -l -e 'print "\c_"'

打印 0x1F 或 control-underscore 或 'unit separator' 等。您可以使用小写或大写字母，但只能显示非字母字符 ("\c@" 是空字节，C) 中的 '\0'。请注意，反斜杠需要特殊处理。转义序列不能出现在字符串的末尾。

perl -l -e 'print "\c\X"'

这会打印 0x1C(控制反斜杠)后跟 X 和一个换行符。我想如果你需要在字符串的末尾使用它，你将不得不使用子字符串操作:

perl -l -e 'print substr("\c\X", 0, 1)'

您还可以使用 \c? 在基于 ASCII 的平台上打印 DEL 字符 0x7F(如果您遇到问题，请参阅手册了解 EBCDIC 下的含义，或者您的好奇心被激起了)。

如 Håkon Hægland 所述在comment , 您可以在 Quote and quote-like operators 下找到详细信息在perlop文档。