# STDIN : entrée standard au clavier, noté <STDIN> OU <>
# STDOUT : sortie écran, noté <STDOUT>
# STDERR : sortie en erreur
# chomp $var : permet de retirer le caractère de saut de lignes
# chop $var : retire n'importe quel caractère de fin

#!/usr/bin/perl -w
# erreur de syntaxe classique : 
#ne pas mettre de virgule après le filehandle
print STDOUT "Quel est ton prénom ? ";
$prenom = <STDIN>;
chomp $prenom;
print "Bonjour $prenom, comment vas-tu ? \n";
$cava = <STDIN>;
print "Quel est ton age?\n"; #On complète le dialogue en demandant l'age
$age = <STDIN>;
#Le code est-il correct? 
#Oui, mais on peut rajouter un 'chomp' pour enlever le saut de ligne