如何拆分我想在 Perl 6 中打印的长字符串？

Question

say "This is a very long line, and it seems it will not fit my screen, but alas, I don't know how to split it without getting an additional newline";

如何将 "..." 分成几行（我的意思是在代码中）而不在输出中出现不需要的换行符？换行前想过\，但是不行

Answer 1

似乎没有什么比连接更好的了：

say "This is a very long line, and it "
  ~ "seems it will not fit my screen, "
  ~ "but alas, I don't know how to split "
  ~ "it without getting an additional newline";

Answer 2

您的示例作为一个单词引用 here-doc

say qw:to<END>.join: ' ';
   This is a very long line, and it seems it will not fit my
   screen, but alas, I don't know how to split it without getting
   an additional newline
   END

如果输出是一行并且输入是 space 个分隔单词的列表，则通常有效。

也可以在行中引用和加入：

say q:to<END>.lines.join: ' ';
   This is a very long line, and it seems it will not fit my
   screen, but alas, I don't know how to split it without
   getting an additional newline
   END

保留每一行的格式。