Bonjour,
Comme cela fait longtemps que je tourne en rond je me suis enfin decidee a m'inscrire et poster sur ce site qui m'a deje beaucoup aide.
Alors voila,
J'ai des references $P1 ... $P5 qui sont en fait des tableaux a deux dimensions.
Et une fonction neighbour qui prend 2 de ces tableaux en parametres.
Quand je tape ca :
tout va bien ! Il me retourne bien 0 qui est le resultat attendu pour ces 2 parametres.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 my $isngb=neighbour($P1,$P2); print"$isngb \n";
Mais voila, je voudrais faire une boucle :
Pour calculer tous mes neighbour... Et la c'est le drame !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 for (my $i=1;$i<=5;$i++) { for (my $j=$i+1;$j<=5;$j++) {
J'ai d'abord fait :
mais il en voulait pas...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 for (my $i=1;$i<=5;$i++) { for (my $j=$i+1;$j<=5;$j++) { my $isngb=neighbour("\$P$i","\$P$j");
alors j'ai voulu prendre un chemin detourne :
J'ai verifie il me met bien $P1 $P2 ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 my $temp='$P'."$i"; print "$temp \n";
mais quand je le passe en parametre de neighbour dans la boucle
J'ai toujours le meme message d'erreur :
Code : Sélectionner tout - Visualiser dans une fenêtre à part my $isngb=neighbour("$temp",$P2);
Donc je ne sais plus trop quoi faire...Can't use string ("$P1") as an ARRAY ref while "strict refs" in use at ./polygontest.pl line 26.
Je debute tout juste avec Perl (je viens de finir de lire l'introduction mise sur ce forum) donc il se peut que j'ai fait une erreur tout bete mais je la vois pas
Des idees pour m'aider ?
ps : desolee pour le manque d'accent..(clavier qwerty)
Partager