[Perl] décomposer un nombre, comment ?

décomposer un nombre, comment ? [Perl] - Perl - Programmation

Marsh Posté le 16-08-2003 à 20:49:38    

Bonjour,
 
ma question va paraitre simple..pourtant je cherche depuis des heures sans succés une solution.
 
Je voudrais afficher un nombre  avec des images. Pour cela, j'ai une image pour chaque chiffre 1.gif 2.gif etc..
 
Soit $nombre qui contient un nombre entier. Comment le transformer, avec Perl, en une suite d'images en code HTML ???
 
exemple, si $nombre = 85 alors j'ai <img src='8.gif'><img src='5.gif'>
 
je n'arrive pas à décomposer 85 en  8 puis 5... pouvez vous m'aider ? Ce doit être trés simple, mais je ne vois pas la solution. Merci !

Reply

Marsh Posté le 16-08-2003 à 20:49:38   

Reply

Marsh Posté le 16-08-2003 à 22:23:34    

il faut traiter le nombre comme une chaine de caracteres:

Code :
  1. my $nombre = "845";
  2. $nombre  =~ s/(\d)/print "<img src='$1.gif'>";$1/ge;


 
 
 
 

Reply

Marsh Posté le 17-08-2003 à 00:25:02    

et voila :D

Reply

Marsh Posté le 17-08-2003 à 12:59:59    

Merci pospos, ça marche !
 
je vais finir par mettre ton nom en copyright de mon site si tu continues de m'aider comme ça ;-))

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed