retour multiple de fonction

Salut tout le monde!!!

J'ai une fonction qui doit me retourner deux choses : un tableau à deux dimension et un chiffre.
Le problème c'est que je ne sais pas comment faire pour récupérer cet élément. dans mon programme principale.
est-ce que si je fait :

Code:

---

(@tab,$i) = &ma_fonction();

---

ca passe?
voilà merci pour l'aide.

Salut,

Je ne suis pas un pro mais je viens de te faire un petit exemple
############################

use strict;


my ($val,@tab) = &ma_fonction();
print "\nVALEUR 0 = $tab[0]";
print "\nVALEUR 1 = $tab[1]";
print "\ni = $val";



sub ma_fonction {
my @ma_fonction;
my @Vtableau=("aaa","bbb");
my $Vint=10;



return $Vint, @Vtableau ;
}
############################

En sortie j'ai
VALEUR 0 = aaa
VALEUR 1 = bbb
i = 10

A+

Code:

---

1 2 3 4 5 6 7 8 9 10 11

my ($val, $RefTab) = &ma_fonction(); print $val . " " . $RefTab->[0]."\n"; sub ma_fonction { my @ma_fonction; my @Vtableau=("aaa","bbb"); my $Vint=10;   return ($Vint, \@Vtableau) ; }

---