Tutoriel Perl
Acte I
1. Introduction
Perl est un langage de programmation polyvalent, souvent utilisé pour les
tâches de traitement de texte, l'administration système, le développement web
et plus encore. Voici une introduction aux bases de Perl pour vous aider à
démarrer.
Installation de Perl
Pour installer Perl, vous pouvez télécharger l'installateur depuis
perl.org pour votre
système d'exploitation (Windows, MacOS, Linux, ChromeOS).
Premier script Perl
Un script Perl est simplement un fichier texte contenant du code Perl avec une
extension `.pl`. Voici un exemple de "Hello, World!" en Perl :
#!/usr/bin/perl
use strict;
use warnings;
print "Hello, World!\n";
1. `#!/usr/bin/perl`: Indique au système que ce fichier doit être exécuté
avec l'interpréteur Perl.
2. `use strict;` et `use warnings;` sont des directives permettant
d'aider à écrire un code propre et à éviter les erreurs courantes.
3. `print` est une fonction pour afficher du texte à l'écran.
Variables en Perl
Perl utilise trois principaux types de variables : scalaires, tableaux et hachages.
Variables scalaires
Les variables scalaires stockent des valeurs simples comme des nombres ou des
chaînes de caractères et sont précédées d'un symbole `$`.
my $name = "Chloe";
my $age = 24;
print "$name is $age years old.\n";
Tableaux
Les tableaux stockent des listes de valeurs et sont précédés d'un symbole `@`.
my @colors = ("red", "green", "blue");
print "First color: $colors[0]\n"; # Les indices de tableau commencent à 0
Hachages
Les hachages sont des paires clé-valeur et sont précédés d'un symbole `%`.
my %data = (
"name" => "Chloe",
"age" => 24,
"city" => "Paris"
);
print "Name: $data{name}\n";
Contrôle de flux
If-Else
my $number = 10;
if ($number > 5) {
print "The number is greater than 5.\n";
} else {
print "The number is 5 or less.\n";
}
Boucles
For
for (my $i = 0; $i < 5; $i++) {
print "Iteration: $i\n";
}
Foreach
my @numbers = (1, 2, 3, 4, 5);
foreach my $num (@numbers) {
print "Number: $num\n";
}
Foreach avec un hachage
# Utilisation de foreach pour itérer sur les paires clé-valeur du hachage
foreach my $key (keys %data) {
my $value = $data{$key};
print "$key: $value\n";
}
While
my $count = 0;
while ($count < 5) {
print "Count: $count\n";
$count++;
}
Subroutines (Fonctions)
Les subroutines permettent de réutiliser du code. Elles sont définies avec le
mot-clé `sub`.
sub greet {
my ($name) = @_;
print "Hello, $name!\n";
}
greet("Chloe");
Switch
En Perl, il n'existe pas de construction `switch` native comme dans d'autres
langages de programmation, mais on peut obtenir un comportement similaire en
utilisant une structure `if-elsif-else` ou un hash comme alternative :
Utilisation de `if-elsif-else` :
my $variable = 'b';
if ($variable eq 'a') {
print "La variable est 'a'\n";
} elsif ($variable eq 'b') {
print "La variable est 'b'\n";
} elsif ($variable eq 'c') {
print "La variable est 'c'\n";
} else {
print "La variable n'est ni 'a', ni 'b', ni 'c'\n";
}
Utilisation d'un hash :
my %cases = (
'a' => sub { print "La variable est 'a'\n"; },
'b' => sub { print "La variable est 'b'\n"; },
'c' => sub { print "La variable est 'c'\n"; },
);
my $variable = 'b';
if (exists $cases{$variable}) {
$cases{$variable}->();
} else {
print "La variable n'est ni 'a', ni 'b', ni 'c'\n";
}
Ces deux alternatives sont sûres et recommandées pour les versions récentes
de Perl.
Modules et Bibliothèques
Perl possède un vaste écosystème de modules disponibles via CPAN (Comprehensive
Perl Archive Network). Vous pouvez utiliser un module avec l'instruction `use`.
use POSIX qw(strftime);
my $date = strftime "%Y-%m-%d", localtime;
print "Today's date: $date\n";
Exécution de scripts Perl
Pour exécuter un script Perl, enregistrez-le dans un fichier avec l'extension
`.pl` (par exemple, `script.pl`)
et utilisez la commande suivante dans le terminal :
$ perl script.pl
Lire un fichier en Perl
Pour voir comment lire un fichier en Perl,
allez voir
cette page.
Ressources supplémentaires
Pour approfondir vos connaissances en Perl, voici quelques ressources utiles :
- Documentation officielle de Perl :
https://perldoc.perl.org/
- Perl.org :
https://www.perl.org/
- Learn Perl :
https://learn.perl.org/
En maîtrisant ces bases, vous serez bien équipé pour commencer à écrire vos
propres scripts Perl et à explorer les capacités plus avancées du langage.
Created with ChatGPT