Как я могу напечатать элементы списка, разделенные потоками строк в 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;
Ответ 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";