table de hashage en parametre?

Version imprimable

09/07/2008, 10h05
yoruichiy

table de hashage en parametre?

bonjour,
je cherche a appeler un script à partir d'un autre en lui donnant en parametre des tables de hashage
est ce possible a faire?

my @a=`bk_comment.pl %consumer %statement`;
comme ca évidemment ca ne marche pas, si c'est faisable quelle est la syntaxe dans le fichier qui appelle et comment les recupérer dans le fichier appelé

merci par avance
09/07/2008, 10h31
djibril

je te proposerais plutôt de faire des .pm afin de partager des procédures avec en arguments des hash.

Je sais qu'en orienté objet, tu peux créer un script.pm (package) et l'appeler via un script.pl en lui passant des paramètres. Est-ce ce que tu voudrais faire?
http://www.netalive.org/tinkering/serious-perl/

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#------------- Sequence.pm ----------------#
 
use strict;
use warnings;
package Sequence;   
 
sub new                                                 # fonction est définie
{
        my ($Classe, $NomSeq, $Sequence) = @_;
        my $self = {};                                  # référence anonyme vers une table de hachage vide
        bless ($self, $Classe);                         # indique que la référence est liée au package (à la classe)
        $self->{NOM} = $NomSeq;
        $self->{SEQUENCE} = $Sequence;
        return $self;
}

Code:

1
2
3
4
5
6
7
8
9
#------------- Sequence.pl ----------------#
 
use strict;
use warnings;
use Sequence;
 
 
 
my $seq1 = Sequence->new ("Seq1", "ATGCCTGATGGCGTAATCCGTGAC");

Sinon, ce que je fais dans ton cas, est de copier en sortie du script 1 les valeurs du hash dans un fichier texte et de les récupérer en entrée du script 2. Cela me fait un backup des données.

09/07/2008, 16h28
djibril

Pas besoin de faire de l'objet pour créer un .pm jasmin, il peut faire plus simplement :mrgreen:
10/07/2008, 08h10
Jasmine80

Oui, je supposais bien que l'objet était inutile mais je n'en étais pas certaine. C'était surtout afin de donner un exemple de script.