Discussion :

[foolib]

Boujour/bonsoir,

j'ai besoin d'un petit éclaircissement dans une 'methode' de class :
Soit le package suivant :

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
package Person;
 
use warnings;
use strict;
 
sub new{
	my $class = shift;
	my $self = {@_};
	bless ($self, $class);
	return $self;
}
 
sub adress { $_[0]->{adress}=$_[1] ifdefined $_[1]; $_[0]->{adress} }
 
1;

Je sais que le premier paramètre passé à une méthode d'instance est la référence vers l'objet ( hash interne en l'occurence ).

Dans la methode "adress" sensée servir de getter/setter, que désigne $_ ?

S'agit il d'une référence sur l'Array correspondant aux paramètres ? En réalité je ne saisi pas la notation. Pourquoi n'est-ce pas @_ qui est employé ?

Merci d'avance

[Norore]

Bonsoir.

En fait la variable $_ représente la valeur courante. Pour le @_ il s'agit du tableau courant.
Donc, en fin de compte, lorsque l'on voit $_[0], il s'agit de la première case du tableau courant qui est passé en paramètre de la méthode 'adress' !

Est-ce plus clair ?

[foolib]

Quand j'éxécute la méthode...
j'obtiens
Bareword found where operator expected at Person.pm line 23, near "] ifdefined"
(Missing operator before ifdefined?)
syntax error at Person.pm line 23, near "] ifdefined "
Compilation failed in require at test.pl line 13.
BEGIN failed--compilation aborted at test.pl line 13.

[Dimitry.e]

Code :

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

1
2
 
if defined $_[1];

[foolib]

Code :

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

1
2
 
if defined $_[1];

Dans la série j'ai pas les yeux en face des trous ... :p

[djibril]

Pourquoi ne pas écrire un code perl propre et surtout lisible en choisissant des noms de variables claires et simples.
C'est bien de vouloir écrire du code en peu de lignes, mais on perd toujours en temps de maintenance, de lisibilité et d'efficacité.

[foolib]

Pourquoi ne pas écrire un code perl propre et surtout lisible en choisissant des noms de variables claires et simples.
C'est bien de vouloir écrire du code en peu de lignes, mais on perd toujours en temps de maintenance, de lisibilité et d'efficacité.

Je suis d'accord à 101% ...
Le fait est que j'apprends le perl et dans le livre que je lis il y a cet exemple un peu de côté : J'aime bien comprendre pour ne pas risquer d'être suppris en voyant certaines pratiques.

[djibril]

Voici une documentation sur perl et la programmation objet.