Discussion :

[Adoc5]

Bonjour à toutes et tous,

J'ai la ligne suivante : 9B45024094956502402703CCCA0ECDC8F9450040A655F7F6A1552703CCCA0EA6

Et j'aimerai arriver à faire :
9B + 45 + 02 + ... + F7 =

Donc J'aimerai extraire chaque valeur hexa 2 par 2 et faire la somme globale de la ligne puis passer à la ligne suivante, le tout en PERL.

Merci d'avance pour votre aide.
A+

Cédric

[Invité]

Et t'as quoi à proposer comme code ? As-tu chercher au moins.... ?

Voilà de quoi récupérer les pairs dans ta chaîne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
my $s = '9B45024094956502402703CCCA0ECDC8F9450040A655F7F6A1552703CCCA0EA6';
 
while ($s =~ m/(\w{2})/g) {
    print $1 . "\n";
}

T'as plus qu'à faire ta somme. Allez, un peu de courage...

[danathane]

Je me permet de squater car il correspond en partie à l'une de mes interrogation.
Est ce que le substr est plus ou moins efficace que les expressions regulières?

[Invité]

Je me permet de squater car il correspond en partie à l'une de mes interrogation.

Je te conseille de faire un autre post......