Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset
Comments Off

Structure de Contrôle: Exemple de l’opérateur ternaire

Your ads will be inserted here byEasy AdSense.Please go to the plugin admin page to paste your ad code. Download   #!/usr/local/bin/perl -w   print "Tapez un nombre: "; $line=<STDIN>;   # Vérifier si un...
Comments Off

Exemple d’utilisation d’un bloc ‘continue’ lié à ue boucle

Your ads will be inserted here byEasy AdSense.Please go to the plugin admin page to paste your ad code. Download #!/usr/bin/perl -w   $i = 0;   while ($i < 10) { print "Iteration $i.n";   }...
Comments Off

Entrez dans une boucle infinie avec ‘for’

Your ads will be inserted here byEasy AdSense.Please go to the plugin admin page to paste your ad code. Download   #!/usr/local/bin/perl -w   for (;;) { print "Vous entrez dans un cycle..............."; ...
Comments Off

Structure de contrôle: Exemple d’un bloc nu

Download #!/usr/bin/perl -w   # Le bloc nu exécute une seule fois son contenu # et limite la portabilités de ses variable. { print "Tapez un nombre: "; chomp(my $n = <STDIN>); #Lire l'entrée...
Comments Off

Utilisation de la boucle ‘for’ en mode ‘foreach’

Download   #!C:/perl/bin   for (1..10) { print "$_ pas!n"; } Livres sur ce sujet [amazon_image id=”2841773698″ link=”true” target=”_blank” size=”medium”...
Comments Off

Structure de contrôle: Trouver les nombres pairs à l’aide d’une boucle do…while et ‘next if’

Download #!/usr/bin/perl   use warnings; use strict;   my $x = 0; # Trouver les nombres pairs entre 0 et 1000 do { { next if ($x % 2); print $x, "n"; } } while ($x++ < 100); Livres...
Comments Off

Exemple de structure de répétition do…while

Download   $compteur = 1;   do { print "Compteur= $compteur "; } while ( ++$compteur < 100 );   print "Terminé."; Livres sur ce sujet [amazon_image id=”2841773698″...
Comments Off

Exemple d’utilisation d’une boucle do…until

Download #! /usr/bin/perl#   $compteur = 100;   do { print "Compteur= $compteurn"; } until ( --$compteur == 0 );   print "Fin."; Livres sur ce sujet [amazon_image id=”2841773698″...
Comments Off

Arrêt immédiat d’une boucle avec l’opérateur ‘last’

Download #!/usr/bin/perl ################## last ############# # l'opérateur 'last' est l'équivalent de # l'opérateur 'continue' de c dans perl #   # Si l'entrée clavier contient 'je', afficher l'entrée while (<STDIN>) { ...
Comments Off

Trouver les répétitions dans un groupe de mots

Download   #!/usr/bin/perl     my @analog = qw{ perl avec java est efficace mais perl avec python est moins efficace que python avec java }; my %deja_vu; @new_data=(); foreach (@analog) { print...
Sex Cams Movable Theme