Perl et la génération de nombres, possible ?

Bonjour a tous !
J'espère que vous allez bien ! :D

J'aurais une requête concernant un script Perl, s'il vous plaît.
J'ai essayé de nombreuses fois, .... sans succès :cry:
Je commence à m'inquiéter :(

Alors voilà, je vous explique en espérant qu'une âme de bonne volonté pourrait m'aider:

Example:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

^XA ^PMN ^MNY ^MMR ^MTT ^MD20 ^LH0,0 ^LL150 ^PR2 ^JMA ^FO20,4^CI0^A0N,50,25^FR^FDID^FS00001^FS ^FO20,50^BY1.6,3.0,45^BCN,75,N,N,N^FR^FD^FS ^FO95,132^CI0^A0N,47,35^FR^FD00001^FS ^PQ1 ^XZ ^XA ^PMN ^MNY ^MMR ^MTT ^MD20 ^LH0,0 ^LL150 ^PR2 ^JMA ^FO20,4^CI0^A0N,50,25^FR^FDID^FS00002^FS ^FO20,50^BY1.6,3.0,45^BCN,75,N,N,N^FR^FD^FS ^FO95,132^CI0^A0N,47,35^FR^FD00002^FS ^PQ1 ^XZ etc.

---

J'aurais besoin d'un script qui génère 10000fois, le bloc de text entre "^XA" et "^XZ" (inclus) et qui incrémente chaque fois de 1 la valeur indiqué en gras souligné.
Les zéros, et les espaces entre chaque bloc de texte sont importants.
Donc on aura quelque chose comme 00001, 00002, 00003 ... à 10000.
Seulement ce nombre change, bonne nouvelle! :D
Le résultat final, ca serait cool si je l'obtenais dans un fichier.

Je suis ouvert a toute aide car pour honnête avec vous, je ne suis pas développeur mais technicien :?

Je vous remercie d'avance et

Passez une bonne journée ! :coucou:

Qu'avez vous déjà fait ?

Un algorithme qui me semble correct si je le suis.
mais je ne sais pas écrire* le code :(
Pas d'expérience en programmation :-/

Sans être indiscret, c'est quoi comme langage ces blocs ?

Une idée serait de créer dans une variable scalaire, un "modèle" (template) du bloc à écrire qui soit accepté par printf. Dans ce bloc, tout le contenu fixe sera inséré tel quel, et la partie variable sera insérée sous forme de format printf (dans ton cas, %05d). Pour initialiser une telle variable, tu peux utiliser l'opérateur de chaine "here document" (<<FIN_CHAINE), ou encore l'opérateur qq().

Ensuite, une simple boucle affichant ce texte pour des valeurs numérique de 1 à 10000 grâce à l'opérateur .. devrait faire l'affaire.

J'ai pratiquement écrit le code en t'indiquant cela. Tu peux chercher la syntaxe de ces opérateurs et fonction à l'aide de la commande

Code:

---

1 2	perldoc -f printf perldoc perlop

---

Si tu veux plus d'aide, n'hésite pas :)

Bonjour !

C'est du ZPL*.
Ok, je vais regarder aussi les cours de PERL sur le site, car c'est ma première fois :-/
Je te remercie bien Philou67430 !
Mais je suis sûr que je vais te revenir car je doute que je réussisse ca du premier coup, je suis pas magicien :D

Bonne journée! :)

N'hésite pas à poster un premier jet.

Finalement, j'ai pu le faire en bash.
Ca n'était pas si compliqué

Merci encore.
Bonne journée.