Récupérer les variables d'un .pm

Bonjour,

Mon problème est le suivant:

J'aimerai faire un fichier de configuration pour mon script.
J'ai donc pensé à un .pm, mais comment garder les variables et les valeurs attribuées à ces variables au moment de l'intégration dans mon script ?


J'ai en effet l'impression, sauf erreur de ma part, que les variables du .pm sont détruites ou du moins leurs valeurs ne sont pas réutilisables dans mon script principal :(

Y'a t-il une manip ou un paramètre à préciser ?

Merci de votre aide :)

Il faut les exporter, du module vers les scripts l'utilisant ...

Dans le module :

Code:

---

1 2 3 4

package MonPM; use Exporter; our @ISA = qw(Exporter); our @EXPORT = qw($var1, $var2, @tab3, &func4);

---

Il y a aussi d'autres possibilités ... mais celle-ci devrait suffire.

Merci beaucoup 2eurocent :)

Cependant, je vais plutot essayer de passer par un fichier.conf avec un OPEN file en fin de compte :p

A ce propos ... :p
je récupère les lignes de mon fichier.conf comme suit:

Code:

---

1 2 3 4 5 6 7 8 9

#!/usr/bin/perl #Author : Marie Aragon #Date : 12/08/2005   my @tampon=(); open FILE, "< ./conf/build.conf" or die "build.conf n'existe pas !\n"; @tampon=<FILE>; close FILE;

---

Apercu de mon build.conf

Code:

---

1 2 3 4 5

Chemin du premier repertoire: d:/toto Chemin du second repertoire: d:/titi

---

J'aimerai donc récuperer ces chemins pour les intégrer à mon script..
C'est là que tout se complique :( un "\n" est automatiquement inséré à la fin de chaque ligne.

En conséquence, lors de ma concaténation...

Code:

---

1 2	$chemin = $tampon[1] . "/maison/meuble";

---

ca ne le fait pas du tout...

Besoin de votre aide :oops:

Merci d'avance.

Marie.

Ok je viens de trouver :)

Les fonctions split() et chomp() sont mes amies :)

Merci.

Marie.

Si tu veux quelque chose de plus complet et de plus robuste, tu peux aussi te pencher sur App::Config.

--
Jedaï