#!/usr/local/bin/perl 
# ce programme affiche "mon premier fichier perl" 
print "mon premier fichier perl\n"; 
$var1=33;					#valeur1 est égale à 33
$var2=44;					#valeur2est égale à 44
$var3=55;					#valeur3 est égale à 55

print "$var1, $var2, $var3 \n";	#affiche moi les valeurs des variables	

$somme=$var1+$var2;
print "$somme \n";

$somme=$var2+$var3;
print "$somme \n";


$somme=$var1+$var2+$var3;  
print "$somme \n";

$produit= $var1*$var2*$var3;
print "$produit \n";


{

$var1=$var2;
$temp=$var1;
print "$temp \n";

$var2=$var3;
$temp=$var2;
print "$temp \n";

$var1=33;
$var3=$var1;
$temp=$var3;
print "$temp \n";
}