• [^] # Re: Mauvaise syntaxe

    Posté par (site web personnel, Mastodon) . En réponse au message Passage d'array dans une subroutine. Évalué à 2.

    Pour compléter, voici donc le code qui fonctionne comme je le souhaite :

    #!/usr/bin/perl -swl
my $scalar=45;
my @table=[5, 6, 7];
my %hash=("test"=>"TEST", "abc"=>"ABC", "ghi"=>"GHI");
my $final=[$scalar, \@table, \%hash];
sub findHashValue{
 my ($contref,$key)=@_;
 my @container=@$contref;
 print "We search key ->$key<- in @container with ref $contref (first element is $container[0])";
 for($i=0;$i<$#container+1;$i++){
 print $container[$i];
 }
}
findHashValue($final,"test");

    En effet, c'est bien une référence de tableau que j'ai en utilisant l'outil Tie::iCal.