use locale;
#!/usr/bin/perl
print "Donnez un nombre : ";
$a=<>;
chomp($a);
print "Donnez un autre nombre : ";
$b=<>;
chomp($b);
$c=$a+$b;
print "\$a + \$b = $a + $b = $c\n";