est ce que quelqu un peut m aider en perl
voila mon probleme
j ai un tableau avec deux chiffre 012345 et 012350 je veux avoir la liste des nombre entre ces deux numero sachant qu ils commence par 0 donc en decimal ca passe pas
voila sur quoi je suis
Code :
- #!/usr/bin/perl
- my (@liste) = ("0123","0129" );
- my $indice;
- my $debug ="1";
- if ($debug == "1" ){print "liste = @liste\n first = $liste[0] => last = $liste[-1]\n";}
- my $end = $liste[-1] + 1;
- for ($i = $liste[0]; $i < $end; $i++)
- {
- if ($debug == "1" ){print "liste $i\n";}
- $indice = $i;
- print "$indice \n";
- }
|
Message édité par gilou le 04-04-2010 à 09:10:46