Discussion :

[Jasmine80]

Définition de dictionnaire.phpmyvisites.net
http://dictionnaire.phpmyvisites.net...word--7078.htm

Définition du mot BAREWORD , Littéralement « mot nu ». En Perl, désigne un terme qui n'appartient pas au langage, ni n'est associé à une variable etc. Du point de vue du langage, il ne signifie rien.

Je ne comprends pas bien. FILE est pourtant dans ce cas associé à $filename …
Pourriez-vous me donner d'autres exemple de 'bareword'? Un nom de sous-programme en est également un non?

Code :

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

1
2
Open FILE, ‘<’, $filename
	Or croak « Can’t open ‘$filename’ : $OS_ERROR »;

Passage de ‘Perl Best Practices’, O’Reilly, chapter 10 : I/O, p202.

Don’t use bareword filehandle
Using a bareword like that as a filehandle causes Perl to store the corresponding input stream descriptor in the symbol table of the current package. Specifically, the stream descriptor is stored in the symbol table entry whose name is the same as the bareword; in this case, it’s *FILE. By using a bareword, the autor of the previous code is effectively using a package variable to store the filehandle.

Donc Perl crée une table de symboles afin d’y stocker les ‘bareword’, pourriez-vous m’expliquer le fonctionnement. Comment doit-on correctement ouvrir un filehandle ? Est-ce uniquement par un filehandle indirect (comme expliqué au paragraphe suivant dans le livre).

Code :

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

1
2
Open my $FILE, ‘<’, $filename
	Or croak « Can’t open ‘$filename’ : $OS_ERROR »;

Merci beaucoup pour votre aide.

[Jedai]

FILE n'est pas un mot clé du langage, et tu ne l'as pas mis entre guillemets, donc ce n'est pas une string. Sans "use strict", un tel mot isolé et sans sens particulier serait traité comme une string tout de même. Cela a pour effet de masquer des fautes de frappe dans des noms de fonctions ou autre problèmes du même genre, c'est pourquoi "strict" interdit les barewords, excepté dans open() ou avant un "=>".

Dans open() si tu donnes une string en premier argument, il associe le filehandle au symbole correspondant dans la table de symbole. Cette façon de fonctionner a plein d'inconvénients : outre le fait que c'est une exception par rapport au reste du langage, les globs sont des variables globales, tu ne peux donc pas ouvrir deux filehandles du même noms en même temps sans en écraser un, ce qui peut avoir des conséquences imprévisibles, passer outre cette limitation exige une utilisation hautement non intuitive de local().
Les filehandles lexicaux comparés à cela n'ont que des avantages, il sont locaux, ils se ferment automatiquement s'ils ne sont plus référencés, on peut utiliser des méthodes dessus qui donnent des noms plus clairs à des opérations obscures avec les globs, etc...

Autrement dit cette recommandation est hautement recommandable et je la suit moi-même avec assiduité.

--
Jedaï

[Jasmine80]

Merci pour cette réponse bien claire.

Dans open() si tu donnes une string en premier argument, il associe le filehandle au symbole correspondant dans la table de symbole. Cette façon de fonctionner a plein d'inconvénients : outre le fait que c'est une exception par rapport au reste du langage, les globs sont des variables globales, tu ne peux donc pas ouvrir deux filehandles du même noms en même temps sans en écraser un

Le bareword FILE dans open FILE ... est donc un "glob"? Quelle est la définition d'un glob? La fonction glob a-t'elle un lien avec cela?

Merci

[Jedai]

Le bareword FILE dans open FILE ... est donc un "glob"? Quelle est la définition d'un glob? La fonction glob a-t'elle un lien avec cela?

Non non, open affecte juste le filehandle au glob qui porte le nom donné par la string (bareword) en premier paramètre. Et quand je parle de glob, je parle de typeglob. Pour mieux comprendre le sujet, un peu d'aide sur la notion de tables de symboles est utile.

Mais tout cela est relativement obscur et pas utile de toute façon si tu prends la très bonne habitude d'utiliser les filehandle lexicaux partout. On en est à la 5.10 après tout (maintenant installé par défaut dans Ubuntu 5.10 et dérivés, bonne nouvelle !).

--
Jedaï

[Jasmine80]

Typeglobs and Filehandles

Perl uses an internal type called a typeglob to hold an entire symbol table entry. The type prefix of a typeglob is a * , because it represents all types.

Ah mais oui, ça rejoint la citation de "Perl Best Practice" citée dans mon premier message. Je comprends vaguement mais comme tu dis l'important est de l'appliquer et pas de comprendre en détails.


Merci pour ton aide.