Discussion :

[Radec]

Bonjour à tous.

Voila j'ai un fichier python contenant des listes de la forme: ["machin","machin2","machin3",...]

Je souhaiterais remplacer ["machin","machin2","machin3",...] par ["machin",_("machin2"),_("machin3"),...]

Je suis en train d'essayer avec un script utilisant une expression régulière du type:

Code :

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

1
2
3
4
5
6
 
#!/usr/bin/perl -w
while(<>)
{
     s/"(.*)"/_("$1")/g
}

Seulement, ça ne marche pas !!
Et ça devrais modifier aussi le premier élément de la liste ce que je ne souhaite pas.

Pour éviter que ça modifie le premier élément de la liste j'avais dans l'idée d'utiliser quelque chose dans le style mais je n'arrive pas à le faire fonctionner.

Code :

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

1
2
 
s/["(.*)"(,"(.*)")+]/_("$2")/g

Si quelqu'un a une idée ...

Merci.

[Jasmine80]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
#!/usr/bin/perl
 
use strict;
use warnings;
 
 
my $string = '["machin","machin2","machin3","machin4"]';
$string =~ s/,"(.*?)"/,_\("$1"\)/g;
 
print $string."\n";
# affiche  ["machin",_("machin2"),_("machin3"),_("machin4")]

Tu n'étais pas loin de la solution. Il faut utiliser un point d'interrogation afin de rendre la recherche non gourmande et un antislash devant tes parenthèses car celles-ci sont des caractères réservés aux Exp Reg.

Pour éviter la première valeur, sers toi de la virgule qui précède toutes les autres valeurs de ta liste.

[Radec]

Merci beaucoup, je n'avais pas pensé à cette possibilité.

Je me pose encore une petite question:
Comment pourrais-je faire ce meme travail si il y à un retour à la ligne entre chaque "machinX" à mettre sous forme de _("machinX") ?

D'avance merci

[Jasmine80]

Je me pose encore une petite question:
Comment pourrais-je faire ce meme travail si il y à un retour à la ligne entre chaque "machinX" à mettre sous forme de _("machinX") ?

D'avance merci

Si tes valeurs étaient dans une variable, ça serait simple

Code :

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

1
2
3
my $string = qq{["machin"\n,"machin2"\n,"machin3"\n,"machin4"]};
# suppression des enter et mise entre parenthèses de chaque valeur excepté la première
$string =~ s/\n,"(.*?)"/,_\("$1"\)/g;

As-tu déjà récupérer tes listes dans des scalaires?
Ou alors as-tu plusieurs listes de valeurs écrites sur plusieurs lignes d'un fichier? Si oui, pourrais-tu en préciser la structure exacte?

Merci,