Bonjour,

j'ai un objet
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
sub new {
    my $classe=shift;
    my $self={};
    ...
J'aimerais avoir une liste de couleur, style

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
my @color=("purple","red");
   $self->{COLOR}=\@color;
1er question, sait on écrire cela en une ligne ?

Mais si je veux rajouter une couleur (ou avoir accès au xième élément), je repasse chaque fois par ce @color
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
my @color=@{$self->{COLOR}};
   push(@color,"blue");
  self->{COLOR}=\@color;
Et deuxième question, écrire cela aussi en une ligne, sans passer par @color

Merci.