Langage Perl

créé en 1987 par Larry Wall
venant du monde Unix, il intègre toutes les fonctions que l'on peut retrouver en shell avec des commandes comme grep, sed, awk, ...
la syntaxe générale ressemble beaucoup à celle du C et du shell
un langage de programmation extrêmement efficace pour traiter les fichiers et les chaînes de caractères
un langage compilé et interprété
disponible sur quasiment toutes les plates-formes

Les principales règles du Perl

les lignes de code se terminent par un point virgule
les noms de variables doivent être précédés par un caractère pour les identifier :
- une variable scalaire (nombre, chaîne de caractères...) est identifié par le symbole '$', par exemple $chaine
- un tableau par le symbole '@', par exemple @tableau, et $tableau[12] représente l'élément n° 12
  un tableau est toujours unidimensionnel
  afin de définir un tableau, on écrit :
  @tableau = (val1, val2, ... , valn);
  Exemple:
```
#!/usr/bin/perl

@jours = ("Lun", "Mar", "Mer", "Jeu", "Ven", "Sam", "Dim");
@WeekEnd = @jours[5,6];  # Affecte ("Sam", "Dim") au tableau @weekEnd

print $jours[0]."\n";    # Affiche Lun
print $WeekEnd[0]."\n";  # Affiche "Sam"
```
- un tableau associatif (hash) par le symbole '%', par exemple %hash
  - une structure indexée par des chaînes de caractères
  - $hash{'prenom'} et $hash{'nom'} servent à enregistrer le prénom et le nom de quelqu'un de façon explicite
  - un tableau associatif est défini de la manière suivante :
    %hash = ( prenom => 'Jean', nom => 'Legrand' );
la déclaration des variables est non typée
la déclaration des variables est obligatoire si on utilise use strict
il y a deux sortes de chaînes de caractères
- la chaîne de caractères définie entre simples cotes (') n'est pas interprétée.
- la chaîne de caractères définie entre guillemets (") est interprétée.
Lorsque Perl interprète une chaîne, il va regarder le contenu de celle-ci pour remplacer les variables qu'il trouvera par leurs valeurs
un commentaire débute par un caractère dièse (#)
le fait de définir l'interpréteur dans le script permet de l'exécuter directement. Pour ce faire il faut placer la ligne suivante au tout début du script :
```
#!/usr/bin/perl
```
Ce qui permettra d'exécuter le script directement par :
```
./script.pl
```
Sans cette ligne il faudrait exécuter le script comme ceci :
```
perl script.pl
```
Perl est un langage très pratique pour manipuler du texte à cause de la présence des expressions régulières.
Elles permettent de déterminer si une chaîne de caractère correspond à un masque prédéfini (expression régulière), d'extraire des éléments d'une chaîne de caractères suivant un masque, de remplacer des parties d'une chaîne suivant un masque, etc.
Exemple:
```
$a =~ /lea/     # teste si la chaîne "lea" est dans la chaîne $a
$a =~ /^lea/    # teste si $a commence par "lea"
$a =~ /l[eé]a/  # teste si la chaîne $a contient "lea" ou "léa"
```