Différences

Ci-dessous, les différences entre deux révisions de la page.

--- perl:introduction_generale_et_pratique [2009/03/15 00:36] – créée root
+++ perl:introduction_generale_et_pratique [2013/03/12 23:39] (Version actuelle) – root
@@ Ligne 1: / Ligne 1: @@
-== 1. Contexte ==
+====== Introduction ======
-=== Historique ===
+====== 1. Contexte ======
+===== Historique =====
 Perl a été créé en 1987 par Larry Wall. Il en est toujours le concepteur et mainteneur principal, mais 20 ans après il est entouré par une large communauté de hackers qui maintiennent, contribuent et utilisent Perl. Perl n'est pas standardisé, mais il existe un unique interpréteur (écrit en C) qui est diffusé sous licence libre (GPL ou "Artistic") et porté sur à peu près tout ce qui peut s'assimiler à un ordinateur de près ou de loin.
@@ Ligne 9: / Ligne 11: @@
 Un travail de refonte et d'évolution majeure de Perl (dit version 6) est en cours depuis 2000. Il n'est pas encore abouti, bien que très riche et très avancé.
-=== Philosophie ===
+===== Philosophie =====
-Perl a été conçu pour traiter des données de façon simple et efficace, et s'est trouvé également pertinent pour de nombreux travaux d'administration système, à l'instar du ''shell'' (dont il emprunte de nombreux idiomes).
+Perl a été conçu pour traiter des données de façon simple et efficace, et s'est trouvé également pertinent pour de nombreux travaux d'administration système, à l'instar du //shell// (dont il emprunte de nombreux idiomes).
 Perl a été conçu avec quelques principes qui lui sont "propres" :
-* Il y a plus d'une façon de le faire.
+  * Il y a plus d'une façon de le faire.
-* Rendre les choses faciles faciles, et les choses difficiles possibles.
+  * Rendre les choses faciles faciles, et les choses difficiles possibles.
 Perl est - entre autres - un acronyme pour "Practical Extraction and Report Language".
-=== Les cousins ===
+===== Les cousins =====
 Perl est très souvent comparé à des langages haut niveau fournissant des services comparables (dans une mesure moindre pour le très spécialisé PHP):
-{| bgcolor="#f7f8ff" cellpadding="3" cellspacing="0" border="1" style="font-size: 95%; border: gray solid 1px; border-collapse: collapse;"
+^ **Langage** ^ **Licence** ^ **Historique** ^ **Actualité** ^ **Environnement**^
-|- bgcolor="#f3fff3"
+| [[http://www.perl.org/| Perl]] | GPL ou Artistic | 1987 | 5.8.x | CPAN, 10.000 modules|
-| '''Langage''' || '''Licence''' || '''Historique''' || '''Actualité''' || '''Environnement'''
+| [[http://www.python.org/| Python]] | Python (compatible GPL) | 1990 | 2.4.x | Pypi, 1300 packages|
-|-
+| [[http://www.ruby-lang.org/| Ruby]] | GPL ou Ruby | 1995 | 1.8.x | Rubyforge, 1500 projets|
-| [http://www.perl.org/ Perl] || GPL ou Artistic || 1987 || 5.8.x || CPAN, 10.000 modules
+| [[http://php.net/| PHP]] | PHP4 (**incompatible** GPL) | 1995 | 4.4.x/5.1.x | PEAR, 370 packages|
-|-
-| [http://www.python.org/ Python] || Python (compatible GPL) || 1990 || 2.4.x || Pypi, 1300 packages
-|-
-| [http://www.ruby-lang.org/ Ruby] || GPL ou Ruby || 1995 || 1.8.x || Rubyforge, 1500 projets
-|-
-| [http://php.net/ PHP] || PHP4 ('''incompatible''' GPL) || 1995 || 4.4.x/5.1.x || PEAR, 370 packages
-|}
-== 2. Utilisation ==
+====== 2. Utilisation ======
-=== Installation ===
+===== Installation =====
 Vous êtes sous Unix: c'est déjà fait ! Perl est en effet devenu un composant essentiel de la majorité des systèmes d'exploitation de type Unix. Essayez :
- $ perl --version
+  $ perl --version
 This is perl, v5.8.8 built for i486-linux-gnu-thread-multi
@@ Ligne 48: / Ligne 43: @@
 Par exemple, vous pourrez constater que de nombreux programme importants de votre système GNU/Linux sont écrits en Perl :
- $ file /usr/bin/*|grep perl
+  $ file /usr/bin/*|grep perl
-Vous êtes sous Windows: dommage, ce sera un peu plus compliqué et délicat. Il existe une distribution complète et de bonne qualité : [http://www.activestate.com/Products/Download/Download.plex?id=ActivePerl ActiveState Perl]. Il vous faudra également faire attention à quelques pièges, consultez les chapitres suivants !
+Vous êtes sous Windows: dommage, ce sera un peu plus compliqué et délicat. Il existe une distribution complète et de bonne qualité : [[http://www.activestate.com/Products/Download/Download.plex?id=ActivePerl| ActiveState Perl]]. Il vous faudra également faire attention à quelques pièges, consultez les chapitres suivants !
-=== Exécution ===
+ ===== Exécution =====
-Si vous avez un fichier ''programme.pl'' qui contient du code Perl (l'extension '''.pl''' est optionnelle), il peut simplement s'exécuter ainsi :
+ Si vous avez un fichier //programme.pl// qui contient du code Perl (l'extension **.pl** est optionnelle), il peut simplement s'exécuter ainsi :
- $ perl programme.pl
-Il est plus traditionnel de passer par le mécanisme standard d'Unix permettant d'appeler l'interpréteur directement depuis le programme. Il faut alors respecter 2 conditions:
+   $ perl programme.pl
-* le programme doit être exécutable :
- $ chmod +x programme.pl
+ Il est plus traditionnel de passer par le mécanisme standard d'Unix permettant d'appeler l'interpréteur directement depuis le programme. Il faut alors respecter 2 conditions:
-* le programme doit commencer par le ''shebang'' et l'interpréteur, éventuellement avec des options :
- #!/usr/bin/perl -w
+  * le programme doit être exécutable :
- print "Hello world!\n";
+   $ chmod +x programme.pl
+  * le programme doit commencer par le //shebang// et l'interpréteur, éventuellement avec des options :
+   #!/usr/bin/perl -w
+   print "Hello world!\n";
 On peut alors invoquer le programme ainsi :
- $ ./programme.pl
-=== Pièges ===
+   $ ./programme.pl
+===== Pièges =====
 Avec Perl sous Windows, vous devrez faire attention à certains détails qui ne vont pas de soi :
-* Invoquez vos scripts Perl en appelant explicitant l'interpréteur avec le script en paramètre, et non en reposant sur l'association entre l'extension '''.pl''' et l'interpréteur: sans cela, les entrées et sorties standard '''ne fonctionneront pas'''.
-* Utilisez un éditeur de texte capable de respecter la convention de fin de ligne Unix (LF, et non la convention Windows qui est CR-LF)
-* Utilisez le slash ('''/''') au lieu de l'anti-slash dans vos chemins de fichier, vous éviterez les oublis d'échappement et quelques problèmes de portabilité
-=== Documentation ===
+  * Invoquez vos scripts Perl en appelant explicitant l'interpréteur avec le script en paramètre, et non en reposant sur l'association entre l'extension **.pl** et l'interpréteur: sans cela, les entrées et sorties standard **ne fonctionneront pas**.
+  * Utilisez un éditeur de texte capable de respecter la convention de fin de ligne Unix (LF, et non la convention Windows qui est CR-LF)
+  * Utilisez le slash (**/**) au lieu de l'anti-slash dans vos chemins de fichier, vous éviterez les oublis d'échappement et quelques problèmes de portabilité
+===== Documentation =====
-La source principale pour un programmeur Perl est '''CPAN''' (Comprehensive Perl Archive Network), qui rassemble la documentation, les modules et les différentes informations afférentes à Perl. On l'utilise principalement pour la recherche sur la documentation des très nombreux modules (http://search.cpan.org/).
+La source principale pour un programmeur Perl est **CPAN** (Comprehensive Perl Archive Network), qui rassemble la documentation, les modules et les différentes informations afférentes à Perl. On l'utilise principalement pour la recherche sur la documentation des très nombreux modules (http://search.cpan.org/).
 Dans l'utilisation la plus courante, on a recours aux traditionnelles pages de manuel. Elles sont très nombreuses, et regroupées par section. Les plus utilisées:
-* '''man perlfunc''' : les fonctions de base de l'interpréteur
-* '''man perldata''' : les données de Perl (listes, hashes, etc) et leur manipulation
-* '''man perlre''' : syntaxe des expressions régulières Perl
-== 3. Le langage ==
+  * **man perlfunc** : les fonctions de base de l'interpréteur
+  * **man perldata** : les données de Perl (listes, hashes, etc) et leur manipulation
+  * **man perlre** : syntaxe des expressions régulières Perl
-=== Les variables ===
+====== 3. Le langage ======
+===== Les variables =====
 Perl utilise 3 types principaux de variables :
-* Les '''scalaires''', qui permettent de représenter des nombres ou des chaînes de caractère. Ces variables sont préfixés par le symbole '''$''' :
+  * Les **scalaires**, qui permettent de représenter des nombres ou des chaînes de caractère. Ces variables sont préfixés par le symbole **$** :
- $pi = 3.1416;
- $hello = "Hello world !\n";
-* Les '''listes''', qui décrivent une suite ordonnée de scalaires. Le préfixe est le symbole '''@''' :
- @menu = ( "salade", "nouilles", "yaourt" );
- print $menu[0];
-* Les '''hashes''' (tableaux associatifs), qui associent une clé (un scalaire) avec une valeur (un autre scalaire). Le préfixe est alors le '''%''' :
- %menu = ( "entrée" => "salade", "plat" => "nouilles", "dessert" => "yaourt" );
- print $menu{"dessert"};
-Les points importants (et parfois suprenants) à noter :
+<code perl>
-* les noms de variables sont sensibles à la casse
+   $pi = 3.1416;
-* les variables $toto, @toto et %toto sont distinctes et peuvent coexister
+   $hello = "Hello world !\n";
-* le préfixe dépend de la valeur accédée (élément du tableau @tab: $tab[0])
+</code>
-* leur déclaration n'est pas strictement nécessaire
-Nous verrons qu'il existe d'autres types spéciaux de variables, comme les descripteurs de fichier et les références.
+  * Les **listes**, qui décrivent une suite ordonnée de scalaires. Le préfixe est le symbole **@** :
+<code perl>
+   @menu = ( "salade", "nouilles", "yaourt" );
+   print $menu[0];
+</code>
-=== Boucles, tests ===
+  * Les **hashes** (tableaux associatifs), qui associent une clé (un scalaire) avec une valeur (un autre scalaire). Le préfixe est alors le **%** :
+<code perl>
+   %menu = ( "entrée" => "salade", "plat" => "nouilles", "dessert" => "yaourt" );
+   print $menu{"dessert"};
+</code>
+ Les points importants (et parfois suprenants) à noter :
+  * les noms de variables sont sensibles à la casse
+  * les variables $toto, @toto et %toto sont distinctes et peuvent coexister
+  * le préfixe dépend de la valeur accédée (élément du tableau @tab: $tab[0])
+  * leur déclaration n'est pas strictement nécessaire
+Nous verrons qu'il existe d'autres types spéciaux de variables, comme les descripteurs de fichier et les références.
+===== Boucles, tests =====
 On retrouve une syntaxe similaire au C pour la boucle classique :
- for ($i = 0; $i < 5; $i++) { ... }
+<code perl>
+   for ($i = 0; $i < 5; $i++) { ... }
+</code>
 Mais on peut aussi facilement parcourir une liste :
- foreach (@menu) { print "au menu: $_\n"; }
+<code perl>
+   foreach (@menu) { print "au menu: $_\n"; }
+</code>
 Et on a le droit de choisir l'ordre dans lequel on écrit les instructions !
- print "au menu: $_\n" foreach (@menu);
+<code perl>
+   print "au menu: $_\n" foreach (@menu);
+</code>
 De même pour les tests :
- if ($menu[0] eq "salade") { print "Encore de la salade!"; }
+<code perl>
- print "Encore de la salade!"; if $menu[0] eq "salade";
+  if ($menu[0]] eq "salade") { print "Encore de la salade!"; }
+  print "Encore de la salade!"; if $menu[0] eq "salade";
-=== Les fonctions ===
+</code>
+===== Les fonctions =====
 Il existe de nombreuses variantes pour déclarer une fonction, la plus courante en Perl étant la plus simple :
- sub somme_entiers {
+<code perl>
-   return $_[0] + $_[1];
+  sub somme_entiers {
- }
+  return $_[0] + $_[1];
- print somme_entiers(4, 9);
+  }
+  print somme_entiers(4, 9);
+</code>
-Une fonction n'a pas nécessairement de prototype, et les arguments sont passés à la fonction via la liste '''@_'''. Chaque argument est passé par référence et peut donc être modifié par la fonction. Le type de retour est libre, les fonctions en Perl sont polymorphes (on peut renvoyer un entier, une chaîne ou une liste dans une même fonction).
+Une fonction n'a pas nécessairement de prototype, et les arguments sont passés à la fonction via la liste **@_**. Chaque argument est passé par référence et peut donc être modifié par la fonction. Le type de retour est libre, les fonctions en Perl sont polymorphes (on peut renvoyer un entier, une chaîne ou une liste dans une même fonction).
+===== Les expressions régulières =====
-=== Les expressions régulières ===
 Elles sont partie intégrante de Perl et en fait la particularité la plus notable du langage. Une expression regulière est un mécanisme de recherche et d'extraction d'information dans les chaînes de caractère. Dans le cas le plus simple, on peut simplement vérifier si un mot est présent :
- print "On a un probleme" if $message =~ /erreur/;
+<code perl>
+  print "On a un probleme" if $message =~ /erreur/;
+</code>
 On peut également reconnaître un format de chaîne et en extraire certains éléments :
- print somme_entiers($1, $2) if ($message =~ /^somme de (\d+) et (\d+)/) >= 2;
+<code perl>
+  print somme_entiers($1, $2) if ($message =~ /^somme de (\d+) et (\d+)/) >= 2;
-=== Modules ===
+</code>
+===== Modules =====
 Perl possède une collection conséquente et centralisée de modules. Ils sont tous documentés et testés. Il est rare de ne pas trouver ce dont on a besoin dans les archives de CPAN.
@@ Ligne 146: / Ligne 168: @@
 Il existe deux types de modules (ceci étant transparent pour l'utilisateur la plupart du temps) :
-* les modules écrits entièrement en Perl
+  * les modules écrits entièrement en Perl
-* les modules utilisant des bibliothèques "natives", c'est-à-dire écrites en C ou C++ (exemple: MySQL, etc)
+  * les modules utilisant des bibliothèques "natives", c'est-à-dire écrites en C ou C++ (exemple: MySQL, etc)
 On peut bien entendu écrire facilement ses propres modules, soit pour réaliser des bibliothèques, soit pour rédiger un programme de façon modulaire.