Discussion :

[ChiPi']

Bonjour , j'ai un problème diabolique dans une boucle while qui ne me laisse jamais sortir d'elle pour continuer mon programme
$data est égal à 1 au début .
jrentre dans le if..et par suite dans le while ...je n'en sort jamais pourtant jlui spécifie meme dedans que $data =0 mais il veut pas....Il revient toujours a mon premier print :
"Le nom de comparaison que vous avez rentré existe deja , voulez-vous écraser l'ancien? (oui/non)

Un coup de pouce ce serait super
MERCI A+

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 if ($data==1){
     while($data!=0) {
print "Le nom de comparaison que vous avez rentré existe deja , voulez-vous écraser l'ancien?  (oui/non)   " ;
$reponse=<STDIN>;
chomp($reponse);
          while(($reponse ne "oui")and($reponse ne "non"))
             {
             print "pas interoretable , retaper (oui.non)" ;
             $reponse=<STDIN> ;
             chomp($reponse) ;
             }
                 if ($reponse eq "oui")  {
my $sth = $dbh->prepare('DELETE  FROM essai where selection=?');
$sth-> execute($nomC) || die "pb de selection : $DBI::errstr";
#my $sth = $dbh->prepare('SELECT count(DISTINCT selection) FROM essai where selection=?');
#$sth-> execute($nomC) || die "pb de selection : $DBI::errstr";
#my $data = $sth->fetchrow();
my $data==0;}              #fermeture du if et en plus jlui di ke $data = 0 il devrait sortir du while
else {print "veuillez entrer un nouveau nom de comparaison?:    " ;  }  #fermeture du else
   }       #fermeture du while
 }#fermeture du data==1

[Fango]

Si tu lui reponds non, il reinitialise pas $data a 0, non?

[jejeman]

Il y a un pb dans ton code.
dans ton if ($reponse eq "oui")
tu fais un my $data==0;
Or à cause de ton my, tu recrées une variable $data dont la portée reste au if et donc dès qu'il sort du if, le $data disparait et c'est l'ancien $data qui reprend sa valeur....
Enlève le my ca ira mieux....

Jérôme

[ChiPi']

COOOOOLLLL

gros gavage
merci franchement !!
problème résolu!
jconnais pas le mode d'utilisation des "My" alors jcomprenais pas le soucis.
en fet un My declare une variable spécifique que dans un block?
Si ta un lien sur leur utilisation chui preneur jve bien me documenter

Encore Merci

[Arioch]

Pour le lien avec les "my", pense à la pragma "strict", voir ma signature