# créer trois variables $var1, $var2 et $var3 auxquelles vous affecterez les valeurs 33, 44 et 55 respectivement
	# Permutez les valeurs de $var1, $var2 et $var3. C'est à dire que $var1 vaudra ce que valait $var2, $var2 ce que valait $var3, et $var3 ce que valait $var1. Pour cela vous créerez une variable temporaire $tmp.

#!/usr/local/bin/perl
$var1=33;	# on déclare la première variable et on lui affecte sa valeur
$var2=44;
$var3=55;
$temp=$var1;	# on affecte à la variable temporaire $temp la valeur de $var1
$var1=$var2;
$var2=$var3;
$var3=$temp;
print "\$var1 egal desormais $var1 \n"; 
print "\$var2 egal desormais $var2 \n";
print "\$var3 egal desormais $var3 \n";