Comment puis-je imprimer des éléments de liste séparés par des sauts de ligne dans Perl?

Quelle est la manière la plus simple d'imprimer la totalité d'une liste d'éléments séparés par des retours à la ligne en Perl?

source d'informationauteur Sergey Stadnik

  1. 31
    print "$_\n" for @list;

    En Perl 5.10:

    say for @list;

    D'une autre manière:

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

    Ou (5.10):

    say join "\n", @list;

    Ou que diriez-vous:

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

    Pourquoi ne pas l'abus de Perl en place les variables globales

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

    Si vous êtes excité pour inutile interpolation de variable n'hésitez pas à utiliser cette version à la place:

    local $" = "\n";
print "@array\n";
  3. 6
    print join "\n", @list;