Velocity Reviews - Computer Hardware Reviews

Velocity Reviews > Newsgroups > Programming > Perl > Perl Misc > [FR-EN] Pb de hachage dans un module (.pm) / make a hash in a module (.pm)

Reply
Thread Tools

[FR-EN] Pb de hachage dans un module (.pm) / make a hash in a module (.pm)

 
 
Alextophi
Guest
Posts: n/a
 
      09-01-2005
french version

bonjour,
je n'arrive pas à faire un hachage dans un module (.pm) avec des
données provenant d'un script (.pl).
Le problème vient du fait que le hachage est désorganisé et contient
le nom du module dans le hachage ! je ne comprends pas comment il est
là.

d'avance merci

Alextophi

################################################## ###########################
english version

hello,
I do not manage to make a hash in a module (pm) with data coming from a
script (pl). The problem comes owing to the fact that hash is
disorganized and contains the name of the module in hash ! I do not
include/understand how it is there.

in advance thank you
Alextophi

################################################## ###########################
- SCRIPT (test.pl),

$req1 = Import_contrainte->ajout_contrainte2(
'nom' => "Paul",
'id' => "008",
'col' => "g2"
);


- MODULE (Import_comtrainte.pm),

sub ajout_contrainte2 {

my %hash = (@_);
my ($cle, $valeur);

foreach $cle (sort(keys %hash)) {
print $cle, '=', $hash{$cle}, "\n";
}

} # fin de fonction


- Result,

008=col
Import_contrainte=nom
Paul=id
g2=

!?!?!?!?!?!?!?!?!

 
Reply With Quote
 
 
 
 
Reinhard Pagitsch
Guest
Posts: n/a
 
      09-01-2005
Hello Alextophi,

Alextophi wrote:
> french version
>
> bonjour,
> je n'arrive pas à faire un hachage dans un module (.pm) avec des
> données provenant d'un script (.pl).
> Le problème vient du fait que le hachage est désorganisé et contient
> le nom du module dans le hachage ! je ne comprends pas comment il est
> là.
>
> d'avance merci
>
> Alextophi
>
> ################################################## ###########################
> english version
>
> hello,
> I do not manage to make a hash in a module (pm) with data coming from a
> script (pl). The problem comes owing to the fact that hash is
> disorganized and contains the name of the module in hash ! I do not
> include/understand how it is there.
>
> in advance thank you
> Alextophi
>
> ################################################## ###########################
> - SCRIPT (test.pl),
>
> $req1 = Import_contrainte->ajout_contrainte2(
> 'nom' => "Paul",
> 'id' => "008",
> 'col' => "g2"
> );
>
>
> - MODULE (Import_comtrainte.pm),
>
> sub ajout_contrainte2 {
>
> my %hash = (@_);
> my ($cle, $valeur);
>
> foreach $cle (sort(keys %hash)) {
> print $cle, '=', $hash{$cle}, "\n";
> }
>
> } # fin de fonction
>
>
> - Result,
>
> 008=col
> Import_contrainte=nom
> Paul=id
> g2=
>
> !?!?!?!?!?!?!?!?!
>


Try this:
--------- .pl ------------------
my $inst = Hello->new();
$inst->PassHash(
'nom' => "Paul",
'id' => "008",
'col' => "g2"
);

-------------.pm -------------------
sub new
{
my $class = shift;
my $h;
my $self = {
AFPDS=>undef ,
CodePage=>undef,
resources=>[],
isError=>0,
HANDLE=>undef,
Error=>undef
};
bless $self, $class;
return $self;

}

sub PassHash
{
my $self = shift;
my %h = @_;
my $cle;
foreach $cle (sort(keys %h)) {
print $cle, '=', $h{$cle}, "\n";
}
}

You do not pass the package name ($self) to the sub in the .pm:
Import_contrainte->ajout_contrainte2(..)
In your case use :
ajout_contrainte2(
'nom' => "Paul",
'id' => "008",
'col' => "g2"
);


regards,
Reinhard
 
Reply With Quote
 
 
 
 
Alextophi
Guest
Posts: n/a
 
      09-01-2005
tanks reinhard,

 
Reply With Quote
 
 
 
Reply

Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
hash of hash of hash of hash in c++ rp C++ 1 11-10-2011 04:45 PM
Le secret c'est dans le traffic ALLALA HTML 1 03-14-2011 01:08 PM
better hachage john.swilting Perl Misc 1 08-24-2007 01:31 AM
Variables d'environnement dans les settings de Visual C++ 6.0 oliv C++ 13 07-14-2006 03:20 PM
probleme dans le passage en parametre dans une fonction Chris Javascript 3 08-05-2004 02:59 PM



Advertisments