Perl modules

Résolu
trinity666 Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   -  
gigaga Messages postés 2347 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
peut on faire un require d'un fichier pl dans un module
j'ai un fichier pl contenant des variables
mais lorsque je fais un require dans mon module, ces variables sont vides
merci par avance
A voir également:

4 réponses

gigaga Messages postés 2347 Date d'inscription   Statut Membre Dernière intervention   301
 
C'est quoi ton code?
0
trinity666 Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   2
 
dans le module:
-------------------------------------------------------------
package machin;
use Exporter;
use common;
our @EXPORT = qw(&f1 &f2 );
our @ISA = qw(Exporter);
use Win32::ODBC;
require "truc.pl";

sub f1{
print "variable du fichier truc: $truc\n";
}

1;
---------------------------------------------------------
fichier truc.pl:
---------------------------------------------------------
our $truc="un truc";
---------------------------------------------------------
fichier de lancement:
---------------------------------------------------------
use machin;

f1();
---------------------------------------------------------

merci par avance
0
gigaga Messages postés 2347 Date d'inscription   Statut Membre Dernière intervention   301
 
Essaie :
do 'truc.pl';
0
trinity666 Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   2
 
ben en fait c'est pas le but
le module est créé dans le but d'utiliser une des variables stokée dans "truc.pl"
et d'utiliser le module plutot que le fichier "truc" qui aura des valeurs modifiée par un autre programme
et la variable apparait toujours vide avec le do
0
gigaga Messages postés 2347 Date d'inscription   Statut Membre Dernière intervention   301
 
eval 'cat truc.pl';

?
0
trinity666 Messages postés 127 Date d'inscription   Statut Membre Dernière intervention   2
 
merci, en fait je viens de me rendre compte que j'avais fait une faute de frappe ca à l'air de marcher
0
gigaga Messages postés 2347 Date d'inscription   Statut Membre Dernière intervention   301
 
ok, tu mets en résolu?
0