macos - 如何在 Perl 脚本打印中添加换行符

Question

我的基本 perl 脚本有问题。下面是脚本。

$message = "Hello, World!";
print $message;

问题是它打印然后在同一行上有我的用户名命令提示符。我提供了所描述问题的屏幕截图。我只想在脚本中添加换行符。这可能吗？

Answer 1

I just want to add a line break to the script. Is this possible?

是的 - 使用换行符 \n 。

my $msg = "Hello World!\n";

注意 perl 中单引号和双引号的区别。以上将打印换行符。但是这个:

my $msg = 'Hello World!\n';

最后会打印一个文字\n 。不同之处在于双引号字符串是内插的:变量和转义序列如 \n 被可预测地替换。单引号字符串不是，所以:

print '$msg';

还将按字面打印 $msg，而不是变量 $msg 的内容。
\n 或多或少是通用的；我不知道它是否起源于 C 或之前的其他东西，但它和其他各种反斜杠字符(例如制表符的 \t)对于我所知道的所有语言都是通用的，包括 shell。正确的术语实际上是转义序列，因为 \ 是影响下一个字符解释的 escape character。为了在 interpolated string 中打印单个反斜杠，您必须首先使用转义符:

print "\\ <- A single backslash\n";

反斜杠还用作正则表达式中的转义字符。单引号和双引号字符串之间的区别不像反斜杠转义那样普遍，但它在其他一些高级语言中使用。