Formatage perl

Résolu
hellowo -  
 hellowo -
Bonjour,

J'ai actuellement une chaine de caracteres dans mon programme perl qui fait :

AAAAAAA
AAAA
AAAAAA
AAA
AAAAAAAAAAAAAAA
AAAA
AAAAAAA

et j'aimerai l'ecrire (j'imagine avec printf) comme ceci :
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AAAA
AA

C'est à dire qu'elle se formate avec un nombre donnée de caracteres par ligne. Si quelqu'un à une idée ...

Merci d'avance !

2 réponses

  1. [Dal] Messages postés 6122 Date d'inscription   Statut Contributeur Dernière intervention   1 108
     
    Salut hellowo,

    Tu peux faire comme cela :

    $st =~ s/\n//g;         # retire les retours à la ligne
    $st =~ s/(....)/$1\n/g; # insère un retour à la ligne
                            # tous les 4 caractères

    Dal
    1
    1. [Dal] Messages postés 6122 Date d'inscription   Statut Contributeur Dernière intervention   1 108
       
      Tu peux ajouter un chomp($st) pour éviter le cas où la chaîne contient un nombre de caractères multiple de 4, afin de retirer le \n additionnel dont tu ne veux peut-être pas en dernière ligne.


      Dal
      0