#!/usr/bin/perl
$age = 25; $prenom ="Jean"; $salut = "Bonjour";
$s1 = "$salut $prenom\n";
print $s1;
$s2 = "As-tu vraiment $age ans ?\n";
print $s2;