Faire lire 2 variables numériques $a et $b, à l'aide de l'opérateur <>

• #!/usr/bin/perl 
  print "Entrer une valeur : "; 
  $a=<>; 
  #on annule le passage à la ligne
  chomp($a); 
  print "Entrer une deuxieme valeur : "; 
  $b=<>; 
  chomp($b); 
  #on affiche $a et sa valeur et $b et sa valeur chacun à la ligne
  print "\$a = ",$a,"\n","\$b = ",$b,"\n";