Discussion :

[jpascal]

Bonjour,

Voici le contenu que je souhaite analyser :

| + Track
|  + Track number: 3 (track ID for mkvmerge & mkvextract: 2)
|  + Track UID: 208241622015289522
|  + Track type: audio
|  + Default track flag: 0
|  + Codec ID: A_AC3
|  + Default duration: 00:00:00.032000000 (31.250 frames/fields per second for a video track)
|  + Audio track
|   + Sampling frequency: 48000.0
|   + Channels: 6
| + Track
|  + Track number: 4 (track ID for mkvmerge & mkvextract: 3)
|  + Track UID: 17276059575939532984
|  + Track type: subtitles
|  + Default track flag: 0
|  + Forced track flag: 1
|  + Lacing flag: 0
|  + Codec ID: S_TEXT/UTF8
|  + Language: fre
|  + Name: forced
| + Track
|  + Track number: 5 (track ID for mkvmerge & mkvextract: 4)
|  + Track UID: 16661143567665435554
|  + Track type: subtitles
|  + Default track flag: 0
|  + Lacing flag: 0
|  + Codec ID: S_TEXT/UTF8

Je souhaite obtenir un tableau avec trois entrées :

| + Track
|  + Track number: 3 (track ID for mkvmerge & mkvextract: 2)
|  + Track UID: 208241622015289522
|  + Track type: audio
|  + Default track flag: 0
|  + Codec ID: A_AC3
|  + Default duration: 00:00:00.032000000 (31.250 frames/fields per second for a video track)
|  + Audio track
|   + Sampling frequency: 48000.0
|   + Channels: 6

| + Track
|  + Track number: 4 (track ID for mkvmerge & mkvextract: 3)
|  + Track UID: 17276059575939532984
|  + Track type: subtitles
|  + Default track flag: 0
|  + Forced track flag: 1
|  + Lacing flag: 0
|  + Codec ID: S_TEXT/UTF8
|  + Language: fre
|  + Name: forced

| + Track
|  + Track number: 5 (track ID for mkvmerge & mkvextract: 4)
|  + Track UID: 16661143567665435554
|  + Track type: subtitles
|  + Default track flag: 0
|  + Lacing flag: 0
|  + Codec ID: S_TEXT/UTF8

Pour obtenir ce résultat, je pourrais bidouiller en ajoutant un | + Track à mon texte d'origine puis en utilisant la RegEx '(?s) Track\R(.*?)\R\| \+'.

Mais j'aimerai savoir comment faire sans. ;-)

[alainbb]

Bonjour,

Voici un script en raku, je n'ai pas réussi à le traduire en perl5.
Il nécessite un retour de ligne en fin de fichier.

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
17
18
19
20
21
22
#!/usr/bin/env perl6
use v6;
 
my $track="| + Track
|  + Track number: 3 (track ID for mkvmerge & mkvextract: 2)
|  + Track UID: 208241622015289522 
|  + Audio track
|   + Sampling frequency: 48000.0
|   + Channels: 6
| + Track
|  + Track number: 4 (track ID for mkvmerge & mkvextract: 3)
|  + Track UID: 17276059575939532984
| + Track
|  + Track number: 5 (track ID for mkvmerge & mkvextract: 4)
|  + Track UID: 16661143567665435554
|  + Codec ID: S_TEXT/UTF8
"; 
 
repeat {
    $track ~~ s/("| + Track\n" ("| " " "+ .*? \n)*)//;
    say "$0"; 
} while $track;

j'ai essayé ça, et des variantes sans succès

Code :

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

$track =~ s/(\| + Track\n(\|  +.*?\n)*)//;

Maintenant, en quoi est-ce vraiment utile de garder "| + Track"dans le résultat ?

[CosmoKnacki]

En mode slurp (tout le contenu du fichier dans une variable), tu peux splitter en utilisant: \n\|( ++).*+\K\n(?!\|\1).

L'idée est de scinder la chaîne à la nouvelle ligne lorsque la ligne suivante contient moins d'espaces d'indentation après la barre verticale.

[alainbb]

30 minutes pour comprendre, j'ai encore beaucoup à apprendre :-)
Bon,
Je ne connaissais pas \K, ni ?!, comme quoi, je devrais lire un peu plus.
Par contre, je ne comprends pas pourquoi il faut mettre \1, plus exactement pourquoi $1 ne fonctionne pas.

[CosmoKnacki]

Une référence au contenu d'une capture dans la pattern même se fait toujours avec \n (où n est le numéro du groupe). Il existe une syntaxe alternative venant d'oniguruma (moteur utilisé dans les anciennes versions de Ruby, maintenant il utilise le fork onigmo) : \g{n}. Cette deuxième syntaxe permet aussi de se référer à un groupe de capture de manière relative: \g{-2} (deuxième groupe à gauche de la position actuelle). $n s'utilise hors de la pattern.

À noter aussi que \1 est définie dés que la capture a eu lieu, alors que la variable $1 n'a d'existence que si la pattern a réussi.

---

Pour la pattern précédente autant capturer la barre, c'est plus court: \n(\| ++).*+\K\n(?!\1)