[Perl] regrouper morceaux de texte similaires
fifto
Messages postés
54
Date d'inscription
Statut
Membre
Dernière intervention
-
lami20j Messages postés 21331 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
lami20j Messages postés 21331 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention -
Bonjour,
Je dois faire une manipulation en perl.
J'ai le fichier texte suivant, et j'aimerais supprimer le texte entre les tableaux.
Voici le fichier texte d'origine:
-----------------------------debut du fichier texte
D I S P L A C E M E N T V E C T O R
POINT ID. TYPE T1 T2 T3 R1 R2 R3
1 G 1.599571E+01 1.185148E-02 -3.111541E+00 1.784951E-06 5.286219E-02 -3.312E-06
2 G 2.303846E+00 1.238950E-02 -1.913684E+00 1.784951E-06 5.286219E-02 -3.342E-06
1000 G 1.009300E-03 -1.461770E-03 -8.895236E-02 -1.380486E-02 1.121588E-03 0.0
du texte en vrac (n'importe quel texte sur plusieurs lignes)
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)§%=)&$§"&%"§&%)&§!"%
1001 G 6.655139E-04 -1.269913E-03 -1.202470E-02 -8.149052E-03 1.912397E-03 0.0
1002 G 2.128328E-04 -4.430452E-04 2.143617E-02 9.356764E-04 -1.131274E-03 0.0
1003 G 1.528846E-04 -3.164306E-04 1.279018E-02 1.256070E-03 -7.879398E-04 0.0
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)§%=)&$§"&%"§&%)&§!"%
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)222ß395702865092435
1004 G 4.770843E-04 -1.147985E-03 2.830649E-02 -3.521185E-03 -6.181516E-04 0.0
1005 G 2.695279E-04 -3.397622E-04 -1.185465E-02 -1.379297E-04 -1.666789E-03 0.0
1006 G 5.318802E-03 -1.288805E-02 1.703259E-01 3.963486E-02 2.937418E-02 0.0
1007 G 3.142439E-03 -5.341556E-03 5.803642E-02 1.815232E-02 1.094855E-02 0.0
-----------------------------fin du fichier texte.
Voici ce que j'aimerais obtenir:
-----------------------------debut du fichier texte
D I S P L A C E M E N T V E C T O R
POINT ID. TYPE T1 T2 T3 R1 R2 R3
1 G 1.599571E+01 1.185148E-02 -3.111541E+00 1.784951E-06 5.286219E-02 -3.342E-06
2 G 2.303846E+00 1.238950E-02 -1.913684E+00 1.784951E-06 5.286219E-02 -3.312E-06
1000 G 1.009300E-03 -1.461770E-03 -8.895236E-02 -1.380486E-02 1.121588E-03 0.0
1001 G 6.655139E-04 -1.269913E-03 -1.202470E-02 -8.149052E-03 1.912397E-03 0.0
1002 G 2.128328E-04 -4.430452E-04 2.143617E-02 9.356764E-04 -1.131274E-03 0.0
1003 G 1.528846E-04 -3.164306E-04 1.279018E-02 1.256070E-03 -7.879398E-04 0.0
1004 G 4.770843E-04 -1.147985E-03 2.830649E-02 -3.521185E-03 -6.181516E-04 0.0
1005 G 2.695279E-04 -3.397622E-04 -1.185465E-02 -1.379297E-04 -1.666789E-03 0.0
1006 G 5.318802E-03 -1.288805E-02 1.703259E-01 3.963486E-02 2.937418E-02 0.0
1007 G 3.142439E-03 -5.341556E-03 5.803642E-02 1.815232E-02 1.094855E-02 0.0
-----------------------------fin du fichier texte.
Et là, je sais pas trop comment m'y prendre....
merci d'avance....
Je dois faire une manipulation en perl.
J'ai le fichier texte suivant, et j'aimerais supprimer le texte entre les tableaux.
Voici le fichier texte d'origine:
-----------------------------debut du fichier texte
D I S P L A C E M E N T V E C T O R
POINT ID. TYPE T1 T2 T3 R1 R2 R3
1 G 1.599571E+01 1.185148E-02 -3.111541E+00 1.784951E-06 5.286219E-02 -3.312E-06
2 G 2.303846E+00 1.238950E-02 -1.913684E+00 1.784951E-06 5.286219E-02 -3.342E-06
1000 G 1.009300E-03 -1.461770E-03 -8.895236E-02 -1.380486E-02 1.121588E-03 0.0
du texte en vrac (n'importe quel texte sur plusieurs lignes)
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)§%=)&$§"&%"§&%)&§!"%
1001 G 6.655139E-04 -1.269913E-03 -1.202470E-02 -8.149052E-03 1.912397E-03 0.0
1002 G 2.128328E-04 -4.430452E-04 2.143617E-02 9.356764E-04 -1.131274E-03 0.0
1003 G 1.528846E-04 -3.164306E-04 1.279018E-02 1.256070E-03 -7.879398E-04 0.0
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)§%=)&$§"&%"§&%)&§!"%
encore du texte en vrac (n'importe quel texte sur plusieurs lignes)222ß395702865092435
1004 G 4.770843E-04 -1.147985E-03 2.830649E-02 -3.521185E-03 -6.181516E-04 0.0
1005 G 2.695279E-04 -3.397622E-04 -1.185465E-02 -1.379297E-04 -1.666789E-03 0.0
1006 G 5.318802E-03 -1.288805E-02 1.703259E-01 3.963486E-02 2.937418E-02 0.0
1007 G 3.142439E-03 -5.341556E-03 5.803642E-02 1.815232E-02 1.094855E-02 0.0
-----------------------------fin du fichier texte.
Voici ce que j'aimerais obtenir:
-----------------------------debut du fichier texte
D I S P L A C E M E N T V E C T O R
POINT ID. TYPE T1 T2 T3 R1 R2 R3
1 G 1.599571E+01 1.185148E-02 -3.111541E+00 1.784951E-06 5.286219E-02 -3.342E-06
2 G 2.303846E+00 1.238950E-02 -1.913684E+00 1.784951E-06 5.286219E-02 -3.312E-06
1000 G 1.009300E-03 -1.461770E-03 -8.895236E-02 -1.380486E-02 1.121588E-03 0.0
1001 G 6.655139E-04 -1.269913E-03 -1.202470E-02 -8.149052E-03 1.912397E-03 0.0
1002 G 2.128328E-04 -4.430452E-04 2.143617E-02 9.356764E-04 -1.131274E-03 0.0
1003 G 1.528846E-04 -3.164306E-04 1.279018E-02 1.256070E-03 -7.879398E-04 0.0
1004 G 4.770843E-04 -1.147985E-03 2.830649E-02 -3.521185E-03 -6.181516E-04 0.0
1005 G 2.695279E-04 -3.397622E-04 -1.185465E-02 -1.379297E-04 -1.666789E-03 0.0
1006 G 5.318802E-03 -1.288805E-02 1.703259E-01 3.963486E-02 2.937418E-02 0.0
1007 G 3.142439E-03 -5.341556E-03 5.803642E-02 1.815232E-02 1.094855E-02 0.0
-----------------------------fin du fichier texte.
Et là, je sais pas trop comment m'y prendre....
merci d'avance....
A voir également:
- [Perl] regrouper morceaux de texte similaires
- Texte de chanson gratuit pdf - Télécharger - Vie quotidienne
- Transcription audio en texte word gratuit - Guide
- Excel cellule couleur si condition texte - Guide
- Comment regrouper des applications sur android - Accueil - Guide Android
- Comment regrouper des pdf - Guide
1 réponse
Salut,
Si je peut me permettre, ce fil de discussion fait parti d'un seule fil commencé ici https://forums.commentcamarche.net/forum/affich-2165042-perl-ou-php-besoin-d-un-exemple-tout-bete
Pour une portion du fichier la solution fonctionne. Normalement pour lundi matin la solution complète sera prête (elle sera tester sur les fichiers entiers).
lami20j
Si je peut me permettre, ce fil de discussion fait parti d'un seule fil commencé ici https://forums.commentcamarche.net/forum/affich-2165042-perl-ou-php-besoin-d-un-exemple-tout-bete
Pour une portion du fichier la solution fonctionne. Normalement pour lundi matin la solution complète sera prête (elle sera tester sur les fichiers entiers).
lami20j