Formation sur le langage PERL

Plan de cours

• introduction
• dis, c’est quoi perl?
• t’as pas encore perl sur ta machine?
• les principes essentiels de perl
• pour commencer
• les listes
• l’interpolation de variable
• la selection par les patterns : le matching
• les tableaux associatifs
• perl en detail
• les variables scalaires
• les listes et les tableaux
• structures de controle
• les tableaux associatifs
• les entrees/sorties
• les expressions regulieres
• les fonctions
• diverses structures de controle
• les manipulateurs de fichiers et les tests sur les fichiers
• les formats
• les repertoires
• manipulation de fichiers et de repertoires
• la gestion de processus
• autres transformations sur les donnees
• acces aux donnees systeme
• manipulation de bases de donnees utilisateur
• convertir d’autres langages en perl
• complements
• exemple d’application
• un systeme de reservation de vols
• le programme perl
• resultats
• exercices
• enonces
• solutions
• annexe : le guide de reference de perl

Profitez de ce manuel de formation en PDF pour comprendre mieux le perl et enrichir votre connaissance.

Commencez à télécharger ce cours adapté pour vous et à apprendre perl.

Le langage PERL juin 1995Page 10La condition $credit!=0 est vraie tant que $credit ne vaut pas 0. L’opérateur != (différent) compare deux valeurs numériques et retournevraisi la première est différente de laseconde; sinon il retournefaux.Perl n’a pas de type booléen; une valeur est vraie si elle est différente de 0 ou « 0 » ou  » »(chaîne vide). Les opérateurs relationnels tels que ==, !=, <, … retournent 1 pourvrai, 0 pourfaux. D’autres opérateurs peuvent retourner d’autres valeurs non nulles pourvraiet la chaînevide pourfaux.Donc tout ce qui a une valeur peut être utilisé comme condition d’unwhile; par exemple, uneaffectation, puisqu’elle retourne la valeur finale de la variable affectée: !#/usr/bin/perlwhile ( $_ = ){ print $_; } Ce script permet de faire afficher les unes à la suite des autres toutes les lignes des fichierspassés en argument dans la ligne de commande. C’est l’équivalent de la commande shellcat.ARGV est un filehandle; est l’entrée.Si ce script est enregistré sous le nomequivcatet quetoto,tutuettitisont des fichiers, la lignede commande: > equivcat toto tutu titi a pour résultat le stockage de la première ligne detotodans $_ et son impression sur la sortiestandard. Puis la deuxième ligne detotoest rangée dans $_ et affichée. Et ainsi de suitejusqu’à épuisement detoto. L’opération est alors réitérée avectutu, puis avectiti.Le script précédent peut encore être simplifié: !#/usr/bin/perlwhile ( ){ print ; } On obtient le même résultat que précédemment. En effet, et représentent la mêmechose; de plus, un symbole désignant une entrée, utilisé seul dans une condition de boucle while , affecte automatiquement la variable $_ ; enfin, si lon ne précise pas de paramètre à print , le contenu de $_ est affiché par défaut.L’autre façon d’exprimer une condition en Perl est d’utiliserif. L’exemple suivant estl’équivalent dugrepdu shell: !#/usr/bin/perl$pattern = shift( @ARGV );while (){ if ( /$pattern/) { print ; }}