Discussion :

[richarno]

Bonjour à tous,

Comment peut-on remplacer les caractères de tabulation '\t' par des espaces en Perl ? Ceci bien sûr en insérant le bon nombre d'espaces c.a.d le caractère suivant un caractère de tabulation doit tomber sur une colonne multiple de 8.

Merci d'avance,
Bruno

[Jasmine80]

C'est étrange ce que tu demandes. Je ne connais aucune fonction permettant cela directement. Ce que je ferais à ta place, c'est de calculer la longueur de ta chaîne précédant ta tabulation et d'en déduire le nombre d'espaces à insérer.

Jasmine,

[djibril]

Code :

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

$chaine =~ /\t/ /g;

[Jedai]

Un truc du genre :

Code :

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

s/\A ([^\t]*) \t/$1.' ' x (8 - (length($1) % 8) )/gxe;

--
Jedaï

[Jasmine80]

Code :

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

$chaine =~ s/\t/ /g;

Je ne savais pas que cette fonction était capable de compter le nombre d'espaces manquant. Je pensais que cela ne faisait que remplacer une tabulation par un seul espace. ^^ on en apprend tous les jours.
J'aime bien votre forum, il est très instructif.

Jasmine,

[Jedai]

Code :

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

$chaine =~ s/\t/ /g;

Je ne savais pas que cette fonction était capable de compter le nombre d'espaces manquant.

C'est probablement parce que ce n'est pas le cas
Mon code fait l'affaire par contre.

--
Jedaï

[Jasmine80]

Je ne sais pas j'ai essayé

Code :

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

1
2
3
4
5
6
7
my $chaine = "aa    aaa      aaa";
my $chaine2 = "aaaaa    aaaaa   aaa";
print "$chaine\n";
print "$chaine2\n\n";
$chaine =~ s/\t/ /g;
print "$chaine\n";
print "$chaine2\n";

J'ai mis des tabulations pour espacer mes a et le nombre d'espaces étaient bien respectés dans le print après l'ExpReg ... j'en ai donc conclu trop vite que cela fonctionnait.
Mais je me suis rendue compte que :
dans l'éditeur mes caractères de tabulation sont remplacés directement par des espaces. Dès sa création $chaine contient des espaces et non la tabulation que j'ai pourtant utilisée pour l'écrire. Ce qui est différent des éditeurs de textes comme Word dans lesquels les tabulations restent des tabulations.
Enfin voila, désolée d'avoir fait ce précédent commentaire.


Jasmine,

[djibril]

j'avais pas compris la question.
En effet mon code ne fait que remplacer les tabulations par des espaces.
Il ne fait absolument pas de comptage ou autre