While en Perl

Fermé
Jack - 14 avril 2009 à 11:51
Char Snipeur Messages postés 9813 Date d'inscription vendredi 23 avril 2004 Statut Contributeur Dernière intervention 3 octobre 2023 - 25 mai 2009 à 16:47
Bonjour à tous les sympathiques bénévoles de CCM :)

Voilà, je commence en perl et je rencontre une certaine difficulté au niveau du While (mais d'après le diagnostique l'erreur est plutôt au niveau du if).... Voyez plutôt:

#! /usr/bin/perl


while (chomp(my $frappe=<STDIN>))

if ($frappe eq "hello") {

print "Hello $USER\n" ;
}
else {
exit ;
}


Qu'en pensez vous? Merci d'avance de l'aide apportée =)

2 réponses

Kharec Messages postés 4146 Date d'inscription dimanche 20 avril 2008 Statut Contributeur Dernière intervention 8 mai 2011 509
14 avril 2009 à 11:57
Il manque juste les accolades après le () du while et à la fin du prog pour signifier ce que la boucle doit répéter tant que $frappe est "hello" :)
0
Char Snipeur Messages postés 9813 Date d'inscription vendredi 23 avril 2004 Statut Contributeur Dernière intervention 3 octobre 2023 1 298
14 avril 2009 à 13:43
Salut.
Il me semble qu'en perl les structures conditionnels doivent toujours (contrairement au C) utilisé les accolades {}
0
Kharec Messages postés 4146 Date d'inscription dimanche 20 avril 2008 Statut Contributeur Dernière intervention 8 mai 2011 509
25 mai 2009 à 16:42
Autre question, svp,

Voici un code PERL

#! /usr/bin/perl

print "Hello World" ;

chomp(my $var=<STDIN>) ;

print "Voici votre frappe: $var" ;


Comment faire le même en C? Je sais que ça commencerai par un code du genre:
main() {

     printf("Hello World") ;
}



Mais comment effectuer une lecture de la frappe du clavier afin de renvoyer la valeur ($var) tapée par l'utilisateur?



Merci beaucoup :-))))
0
Char Snipeur Messages postés 9813 Date d'inscription vendredi 23 avril 2004 Statut Contributeur Dernière intervention 3 octobre 2023 1 298 > Kharec Messages postés 4146 Date d'inscription dimanche 20 avril 2008 Statut Contributeur Dernière intervention 8 mai 2011
25 mai 2009 à 16:47
man printf, et cours élémentaires de C.
0