Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

quit dans un while

6 réponses
Avatar
Alexandre Jaquet
Bonjour,

J'ai une petite question pour quitter une boucle while durant son
éxecution et poursuivre l exectution du reste.

j aimerais faire un truc du genre :

my ($tab_common_article) = sqlSelectMany("id_article", "article","nom
LIKE '%$article_name%' ORDER BY id_article");
while( ($ref_article)=$tab_common_article->fetchrow()) {
my @tab_commande_article = sqlSelect("ref_article",
"article,commande_article","id_article = $ref_article");
my $new_ref = $tab_commande_article [0];
if (!$new_ref) {
exit;
}
soit en francais parcourir ma collection jusqu à ce que je trouve un id
qui n est pas inclu dans la ligne my @tab_commande_article =
sqlSelect("ref_article" ..

d avance merci :)

6 réponses

Avatar
Stephane Zuckerman
soit en francais parcourir ma collection jusqu à ce que je trouve un id
qui n est pas inclu dans la ligne my @tab_commande_article > sqlSelect("ref_article" ..

d avance merci :)


As-tu essayé d'utiliser last ?

while($condition) {
# instructions ...
last if ($trouve);
}

--
"Je deteste les ordinateurs : ils font toujours ce que je dis, jamais ce
que je veux !"
"The obvious mathematical breakthrough would be development of an easy
way to factor large prime numbers." (Bill Gates, The Road Ahead)

Avatar
Alexandre Jaquet
soit en francais parcourir ma collection jusqu à ce que je trouve un id
qui n est pas inclu dans la ligne my @tab_commande_article >>sqlSelect("ref_article" ..

d avance merci :)



As-tu essayé d'utiliser last ?

while($condition) {
# instructions ...
last if ($trouve);
}



salut a premiere vue il boucle toujours :/


Avatar
Paul Gaborit
À (at) Wed, 15 Jun 2005 18:38:00 +0200,
Alexandre Jaquet <""alexjaquet"@[no spam]msn.com"> écrivait (wrote):
J'ai une petite question pour quitter une boucle while durant son éxecution
et poursuivre l exectution du reste.


Lire la doc concernant 'last', 'next' et 'continue' dans perlfunc.
En français :

<http://perl.enstimac.fr/DocFr/perlfunc.html#item_last>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_next>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_continue>

--
Paul Gaborit - <http://perso.enstimac.fr/~gaborit/>
Perl en français - <http://perl.enstimac.fr/>

Avatar
Alexandre Jaquet
À (at) Wed, 15 Jun 2005 18:38:00 +0200,
Alexandre Jaquet <""alexjaquet"@[no spam]msn.com"> écrivait (wrote):

J'ai une petite question pour quitter une boucle while durant son éxecution
et poursuivre l exectution du reste.



Lire la doc concernant 'last', 'next' et 'continue' dans perlfunc.
En français :

<http://perl.enstimac.fr/DocFr/perlfunc.html#item_last>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_next>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_continue>

rien de convainquant :s



Avatar
Alexandre Jaquet

À (at) Wed, 15 Jun 2005 18:38:00 +0200,
Alexandre Jaquet <""alexjaquet"@[no spam]msn.com"> écrivait (wrote):

J'ai une petite question pour quitter une boucle while durant son
éxecution
et poursuivre l exectution du reste.




Lire la doc concernant 'last', 'next' et 'continue' dans perlfunc.
En français :

<http://perl.enstimac.fr/DocFr/perlfunc.html#item_last>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_next>
<http://perl.enstimac.fr/DocFr/perlfunc.html#item_continue>

rien de convainquant :s



je deviens fou j arrive pas pourtant ca m a l air hyper simple

j ai une table article qui contient plusieurs fois la mm valeur

je récupère ces valeurs :

SELECT id_article FROM article WHERE nom LIKE '%nom5%' ORDER BY id_article

ensuite j ai une table article_commande qui peux deja contenir la
référence sur article :

SELECT ref_article FROM article,commande_article WHERE id_article = 80
and ref_article = id_article

si c est vide je prend la valeur de cet id sinon je continue dans la boucle

impossible a le faire la c est a devenir dingue



Avatar
damien guerin
Chez moi :

$cpt=0;
while ($cpt<100){
$cpt++;
if ($cpt=P) {
last;
}
}
print $cpt;

Me sort "50" donc, ça marche le last !