Discussion :

[Zuthos]

Bonjour,

J'ai un fichier LaTeX avec des accolades imbriquées.

je désire avec perl6 effacer une commande particulière. J'efface le début de cette dernière par un simple /s/\\commande_a_effacer\{//Mais, je n'arrive par à situer l'accolade fermante pour l'effacer.

Avez-vous une idées de comment réaliser cela??

[Lolo78]

Bonjour,
je ne suis pas sûr de bien comprendre le problème. Est-ce que tu cherches à repérer l'accolade fermante correspondant à une accolade ouvrante donnée, alors qu'il peut y avoir entre les deux des paires d'accolades ouvrantes-fermantes imbriquées? Dans ce cas, tu désires supprimer juste les deux accolades considérées, ou tout ce qu'il y a entre les deux? Et que peut-il y avoir d'autre entre ces deux accolades en question?

Pourrais-tu donner un exemple de document LaTeX présentant le problème et indiquer le résultat souhaité? En présentant les différents cas de figure possibles s'il peut y en a voir plusieurs?

Selon les cas, la solution pourra peut-être consister en une ou deux regex simples, ou peut-être faudra-t-il créer un mini-parser à l'aide d'une petite grammaire...

[Zuthos]

Bonjour,

voici un exemple d'une commande LaTeX \commande{du texte}.
J'essaye d'isoler "du texte". Dans cet exemple simple, ceci suffit /'\commande{' (<-[ } ]> *)/.

Par contre, il est possible d'imbriquer les commandes en LaTeX \commande{du texte avec une \autreCommande{autre texte} encore du texte}
ici la copie doit être "du texte avec une \autreCommande{autre texte} encore du texte"

Et finalement les commandes peuvent être sur plusieurs lignes comme suit:

Code LaTeX :

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

1
2
3
4
\commande{ des lignes sur plusieurs lignes
avec des commandes \autreCommande{ elle aussi
sur plusieurs lignes}
\encoreCommande{ Pour l'exemple} }

[Lolo78]

Bonsoir,

ça aurait peut-être été plus simple avec du vrai LaTeX, mais voici une façon possible de faire :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
grammar Latex {
   token TOP { <commande-latex> }
   regex texte { <-[ \\ ]> * }
   regex commande-latex { \\ \w+ '{' 
                          ( <texte>
                            <commande-latex> ? 
                            <texte> 
                          ) '}' 
                        }
}
my $str = q<\commande{du texte avec une \autreCommande{autre texte} encore du texte}>;
my $match = Latex.parse($str);
say ~$match{'commande-latex'}[0];

Ce qui imprime ce que tu souhaites apparemment :

Code :

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

1
2
3
 
~ perl6 latex.pl6
du texte avec une \autreCommande{autre texte} encore du texte

[Lolo78]

Re-bonsoir,

j'ai oublié de préciser que la mini-grammaire proposée fonctionne aussi avec un texte multi-ligne et avec un degré d'imbrication supplémentaire des commandes LaTeX comme dans ton second exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
grammar Latex {
   token TOP { <commande-latex> }
   regex texte { <-[ \\  ]> * }
   regex commande-latex { \\ \w+ '{' 
                          ( <texte>
                            <commande-latex> ? 
                            <texte> 
                          ) '}' 
                        }
}
my $str = q<\commande{ des lignes sur plusieurs lignes
avec des commandes \autreCommande{ elle aussi
sur plusieurs lignes}
\encoreCommande{ Pour l'exemple} }}>;
my $match = Latex.parse($str);
say ~$match<commande-latex>[0];

Ce qui affiche:

Code :

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

1
2
3
4
5
6
 
~ perl6 latex.pl6
 des lignes sur plusieurs lignes
avec des commandes \autreCommande{ elle aussi
sur plusieurs lignes}
\encoreCommande{ Pour l'exemple} }

[Zuthos]

Merci beaucoup de ton aide.

On vois ici la richesse de perl et de la grammaire.