Prolongement : à l'aide d'une itération while, dont le syntaxe est esquissée ci-dessous, afficher la table de multiplication par N (N saisi)

• #!/usr/bin/perl 
  print "Entrer une valeur : "; 
  $a=<>; 
  chomp($a); 
  $compteur=0; 
  print "Table de multiplication de $a :\n"; 
  #on affiche le resultat de la multiplication, tant que le multiplicateur est un inferieur ou égal à 10
  while ($compteur<=10) { 
  	print "$a x $compteur = ",$a*$compteur,"\n"; $compteur++; 
  }
  

•