Construction d'un hash

ola ! Bonjours à tous !

Vu la chance que j'ai eu avec mes précédents post je suis pas sur que qqun réponde mais qui sais.. peut être la chance me sourira (comme ca :) ).
Je me lance :
Ca concerne le Perl, c'est jaune et ca tourne en rond! Qui suis-je ?

8D

Non plus sérieusement, toujours en Perl, je voudrais savoir comment on construit un hash automaitquement : J'ai le code suivant dans lequel je veux faire un hash où la clé est le mode d'une requete sql (select, delete, update ou insert) et la value est la requete elle même. Les modes et requetes font partis d'un programme C qui les passe en paramètre à mon petit prog Perl qui doit donc effectuer les requete sur une base.

Voici le code :

my $nbparam = @ARGV;
    die "Mauvais nombre d arguments passe au programme : nbarg = $nbparam\n" if(($nbparam%2) != 0);
    print "$nbparam parametre passes au prog\n";
    my %liste_sql;
    while( @ARGV )
    {
        my $mode = shift;
        my $rqt = shift;
        print "\nmode : $mode\nrqt : $rqt\n";
       # my @liste = ($mode,$rqt);
        #push (%liste_sql,@liste);
    }

Le truc, c'est que je ne peux pas faire de :

$liste_sql{$mode} = $rqt;

Car il peut y avoir plusieur fois le même mode pour des requetes différentes !

Merci et au passage, Mono si tu vois le message, demande à sammax.

++