Bonjour,
 
J'ai un tableau contenant des noms de fichiers. Je voudrais mettre ces noms de fichiers dans une variable ceci afin d'envoyer par mail le contenu de cette variable.
Je n'arrive pas à trouver la soluce car je me retouve avec des doublons en utilisant la concaténation
Explication;

J'obtient donc :
TITI
TOTO
TITI
TOTO
TATA
 
Alors que je veux juste :
TITI
TOTO
TATA
 
Au secour!!!
 
merci d'avance

Chez moi, ça marche:

#!/usr/bin/perl
use strict;
use warnings;
 
my @tab_error = qw(TITI TOTO TATA);
my $var = "";
foreach (@tab_error){
  $var = $var . $_ . "\n";
}
print $var;

Donc a la base, le probleme est ailleurs, dans le remplissage de ton tableau.
De toute façon, la bonne méthode pour imprimer le contenu d'un tableau, c'est d'utiliser join:

#!/usr/bin/perl
use strict;
use warnings;
 
my @tab_error = qw(TITI TOTO TATA);
print join("\n", @tab_error);
# ou print join("\n", @tab_error), "\n"; si on veut un retour a la ligne final.

A+,

Tant qu'on y est, pour virer les doublons d'un array, sans modifier l'ordre des elements, on utilise uniq, du module List::MoreUtils (a installer, s'il ne l'est pas, car en général ce module n'est pas dans les installations basiques)
 

#!/usr/bin/perl
use strict;
use warnings;
 
use List::MoreUtils qw(uniq);
 
my @tab_error = qw(TITI TOTO TATA TITI TUTU TATA TOTO);
print join("\n", uniq(@tab_error));

A+,