#!/usr/bin/perl -w
$age = 25; $prenom ="Jean"; $salut = "Bonjour";
$s1 = "Bonjour $prenom\n" ;
print $s1;
$s2 = 'Bonjour $prenom\n' ;
print $s2;
$s3 =  $salut." ".$prenom."\n"; print $s3;
$s4 = "$salut $prenom\n"; print $s4;
