Discussion :

[Louuu]

Bonjour,

j'essaie des faire des tableaux d'objet mais il doit y avoir un truc que j'ai pas pigé, j'arrive à rien . J'essaie de faire des tableaux d'objet de type "point" ...

Dans tout les tuto on explique ce qu'est la POO mais jamais comment les objets peuvent être utilisé avec tableau, table de hash et autre ...

Merci d'avance!

Louuu

[Gardyen]

comment ça tu n'arrives à rien ? avec les tableaux ou les objets ?

je te conseille de consulter la faq ou les cours perl disponibles, comme celui-là, celà devrait t'aider à y voir plus clair

[Philou67430]

Quelque soit le paradigme de POO utilisé en perl, il y a de fortes chances qu'un objet soit représenté par un scalaire (une référence à un hash le plus souvent). Dans ce cas, il n'y a aucune difficulté à l'utiliser dans un tableau :

Code :

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

1
2
my @obj_array = (MyObj->new(), MyObj->new());
$obj_array[0]->myMethod();

[6ril23]

Louu pour que ce soit plus simple de t'aider, mets nous ce que tu as déjà fait avec les erreurs retournées

c'est beaucoup plus simple avec un problème concret plutôt qu'une question un peu trop général

[Louuu]

Bonjour,

Merci pour votre aide, vos conseils m'ont bien aidé! Du coup avec la technique de Jedai reprise en fin de message, j'arrive maintenant à créer mes objets et les deplacer entre tableau,

par exemple

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
sub Point_c {  
 my ( $classe, $posx, $posy ) = @_;    #on passe les données au constructeur
my $this = {
"posx"    => $posx,     
"posy"    => $posy,
 bless( $this, $classe );      #lie la référence à la classe  
return $this;
}
 
 
my @tt;
my @t = ($pt1, $pt2, $pt3, Point->Point_c(45,66),Point->Point_c(58,79);
push @tt , @t[3];
@t = @t[0..2,4..$#t]

Euhh, on peut faire ça en une seule opération, vous savez.... Ca s'appelle un slice ou une "tranche" en français. Ca permet de faire un tableau qui ne contient qu'une partie des éléments d'un autre tableau, par exemple pour supprimer un élément d'un tableau disons @tableau, et l'élément d'indice $i :

Code :

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

1
2
 
@tableau = @tableau[0..($i-1),($i+1)..$#tableau];

Marche pour tout indice (y compris le début et la fin du tableau).

Evidemment l'outil "slice" est beaucoup plus puissant et peut servir à beaucoup d'autres choses. (Pauvre Perl s'il était incapable de faire un truc aussi simple...)
--Jedaï

Je ne met pas résolu car j'ai deux trois trucs qui passent pas encore mais je vais bosser dessus avant de publier pour rien.

[Philou67430]

Il manque une parenthèse fermante en ligne 13:

Code :

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

my @t = ($pt1, $pt2, $pt3, Point->Point_c(45,66),Point->Point_c(58,79));

Merci à Jedai, l'homme invisible