cgi-lib.pl est une librairie PERL qui permet de gérer entre autres les informations provenant d'un formulaire.
Pour en savoir plus sur cgi-lib.pl, allez lire la présentation.
Supposons que nous avons le formulaire suivant demandant à l'utilisateur de spécifier son nom et son prénom :
<form action="formulaire.pl">
Nom : <input type="text" name="name"><br>
Prénom : <input type="text" name="firstname"><br>
<input type="submit" value="Ok"><br>
</form>
Lorsque l'utilisateur clique sur Ok, le script formulaire.pl doit récupérer les informations introduites et les
afficher sur une page HTML récapitulative.
Voici donc le contenu de mon script perl permettant de faire cela :
#!/usr/bin/perl
print <<FIN;
Votre nom est $nom et votre prénom est $prenom.
FIN
Explications
#!/usr/bin/perl indique au serveur le chemin d'accès à l'interpréteur PERL sur la machine.
require "cgi-lib.pl"; indique qu'il faut également utiliser le fichier cgi-lib.pl (pour y trouver certaines fonctions)
&ReadParse(*in); décode les données introduites par l'utilsateur et les stocke dans le tableau *in.
print &PrintHeader; permet d'imprimer les en tête. Ceci est équivalent à écrire print "Content-type: text/html\n\n";
$nom = $in{'name'}; récupère la valeur introduite par l'utilisateur dans le champ name et la stocke dans la variable $nom.
$prenom = $in{'firstname'}; récupère la valeur introduite par l'utilisateur dans le champ firstname et la stocke dans la variable $prenom.
print <<FIN;
Votre nom est $nom et votre prénom est $prenom.
FIN
ces lignes se contentent d'afficher à l'écran les informations introduites par l'utilisateur dans le formulaire.