Как я могу напечатать элементы списка, разделенные потоками строк в Perl?

Каков самый простой способ распечатать все элементы списка, разделенные потоками строк в Perl?

Ответы

Ответ 1

print "$_\n" for @list;

В Perl 5.10:

say for @list;

Другой способ:

print join("\n", @list), "\n";

Или (5.10):

say join "\n", @list;

Или как насчет:

print map { "$_\n" } @list;

Ответ 2

Почему бы не использовать глобальные переменные Perl вместо

local $\ = "\n";
local $, = "\n";
print @array;

Если вы волнуетесь за ненужную переменную интерполяцию, не стесняйтесь использовать эту версию:

local $" = "\n";
print "@array\n";

Ответ 3

print join "\n", @list;