Discussion :

[manovski]

Bonjour tout le monde,

PERL n'est pas vraiment ma tasse de the. Dans le cadre d'un projet dans ma boite je suis amene a devoir y toucher, j'ai donc une question que j'imagine etre relativement evidente pour vous tous.

Alors voila, je voudrais avoir plusieurs tableaux (les List_patches_xxxx ce-dessous) dans ma classe, mon constructeur ressemble a ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
sub new {
   my $class = shift;
   my $self = {
      Log   => shift, 
      Machine  => shift, 
      Config  => shift,
      List_patches_to_install => undef, 
      List_patches_installed => undef, 
      List_patches_not_correctly_installed => undef,
   };
   bless $self, $class;
   return $self;
}

- Est-ce correcte ?
- Comment puis faire un push sur ce tableau ensuite ? comme ca : push($self->List_patches_to_install,$temp); ?
- COmment acceder a la variable de taille de tableau ? sans classe j'aurais fait un $#List_patches_installed, mais la je ne sais pas.

Merci beaucoup ! et desole pour le manque d'accent mais je suis sur un clavier US.

[Jedai]

Tout d'abord, je trouve ton utilisation de shift très contestable ici, il n'y a aucun moyen de regarder simplement ta fonction et de voir l'ordre des arguments, modifier un peu ton code peut suffire à modifier cet ordre, etc... A la place, j'utiliserais plutôt des arguments nommés ou au moins une affectation explicite de @_.

Par ailleurs ta classe est un hash à la base, donc il se comporte comme une référence de hash :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

push @{$self->{List_patches_to_install}}, $temp;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my $last_index = $#{$self->{List_patches_to_install}};

Et puis le nom est beaucoup trop long... Pourquoi "List_" alors que tu dis déjà "patches" (et encore, moi j'abrègerais sans doute à "to_install").

Il serait également plus clair d'affecter des références de tableaux vide [] à ces clés, plutôt que "undef" (autant ne pas les affecter sinon...).

--
Jedaï

[manovski]

Merci de tes commentaires, je vais prendre tout cela en compte.