将一行 Perl 代码分成两行的正确方法是什么？

Question

$ cat temp.pl
use strict;
use warnings;

print "1\n";
print "hello, world\n";

print "2\n";
print "hello,
world\n";

print "3\n";
print "hello, \
world\n";

$ perl temp.pl
1
hello, world
2
hello,
world
3
hello, 
world
$

为了使我的代码易于阅读，我想将列数限制为 80 个字符。如何将一行代码分成两行而不产生任何副作用？

如上所示，简单的 ↵ 或 \ 不起作用。

执行此操作的正确方法是什么？

Answer 1

在 Perl 中，回车符将出现在常规空格所在的任何位置。反斜杠不像某些语言那样使用；只需添加一个CR。

您可以通过连接或列表操作将字符串分成多行：

print "this is ",
    "one line when printed, ",
    "because print takes multiple ",
    "arguments and prints them all!\n";
print "however, you can also " .
    "concatenate strings together " .
    "and print them all as one string.\n";

print <<DOC;
But if you have a lot of text to print,
you can use a "here document" and create
a literal string that runs until the
delimiter that was declared with <<.
DOC
print "..and now we're back to regular code.\n";

您可以在 perldoc perlop。

Answer 2

Perl 最佳实践中的另一件事：

打破长行：在运算符之前打破长表达式。< /强>
喜欢

push @steps, $step[-1]
                  + $radial_velocity * $elapsed_time
                  + $orbital_velocity * ($phrase + $phrase_shift)
                  - $test
                  ; #like that

Answer 3

这是因为您位于字符串内部。您可以使用 . 拆分字符串并连接，如下所示：

print "3\n";
print "hello, ".
"world\n";

Answer 4

使用字符串连接运算符 .：

$ perl
print "hello, " .
"world\n";ctrl-d
hello, world
$