Aide commande ed/sed/awk/perl

Résolu

vanhell -
vanhell - 22 mai 2009 à 17:11

Bonjour,
J'aimerai dans un fichier texte, supprimer tous les retours à la ligne seulement pour le texte contenu entre motcle1 et motcle2 (la ligne de motcle1 incluse) et laisser le reste du texte inchangé.
motcle1 et motcle2 sont toujours en début de ligne.

Par exemple :

texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte

doit devenir :

texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte
motcle2
texte texte
texte

Comment faire ça avec sed? (ou autre)
Merci d'avance pour votre aide!

A voir également:

Aide commande ed/sed/awk/perl
Invite de commande - Guide
Commande terminal mac - Guide
Commande dism - Guide
Diskpart commande - Guide
Commande scannow - Guide

15 réponses

Réponse 1 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Salut,

sed '/motcle1/{:z;N;/motcle2$/!bz;s/\n/ /g;s/motcle2/\n&/}'

;-))

Réponse 2 / 15

vanhell

Merci pour la réponse super rapide!
Je viens d'essaye mais j'obtiens cette erreur :

sed: The label /motcle1/{:z;N;/motcle2$/!bz;s/\n/ /g;s/motcle2/\n&/} is greater than eight characters.

Je suis sur un environement UNIX AIX, j'ai la commande sed mais pas gsed, peut être a cause de ça non?

Réponse 3 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Essaie comme ça alors :

sed '
/motcle1/ {
:z
N
/motcle2$/ !b z
s/\n/ /g
s/motcle2/\n&/
}
'

Réponse 4 / 15

vanhell

Comme ça plus d'erreurs mais uniquement les 2 premières lignes affichées :

texte texte texte texte texte
texte texte texte

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Bizarre chez moi ça marche bien :

[tmpfs]$ cat plop
texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte

[tmpfs]$ sed '
/motcle1/ {
:z
N
/motcle2$/ !b z
s/\n/ /g
s/motcle2/\n&/
}
' plop
texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte
motcle2
texte texte
texte

[tmpfs]$

;-\ ??

Tu peux faire un copier/coller comme le mien de ce que tu as d'affiché dans ton terminal ?

Réponse 6 / 15

vanhell

[test]$ cat sed.txt
texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte
[test]$ sed '
> /motcle1/ {
> :z
> N
> /motcle2$/ !b z
> s/\n/ /g
> s/motcle2/\n&/
> }
> ' sed.txt
texte texte texte texte texte
texte texte texte
[test]$

Réponse 7 / 15

vanhell

Non en faite ça fonctionne presque, le fichier sur lequel je testé provenait de windows donc fin de ligne avec \r\n...

Avec le même fichier crééer directement sur le serveur j'obtiens maintenant ça :

texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte nmotcle2
texte texte
texte

C'est preque bon il y a un juste un bug juste avant le "motcle2" il a un un "n" au lieu d'un retour a la ligne, je ne sais pas ou est passé l'antislah XD
Bizare surtout que ça fonctionne chez toi...

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Bizarre effectivement ;-\

Par contre chez moi c'est du GNU/Linux et pas du AIX...

Essaies de supprimer "s/motcle2/\n&/" et refais un test.

Réponse 8 / 15

vanhell

J'obtiens ceci :
$ sed '
> /motcle1/ {
> :z
> N
> /motcle2$/ !b z
> s/\n/ /g
> }
> ' sed.txt
texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte motcle2
texte texte
texte

Réponse 9 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Essaye comme ça :

sed '
/motcle1/ {
:z
N
/motcle2$/ !b z
s/\n[^\(mocle2\)]/ /g
}
'

Réponse 10 / 15

vanhell

Presque! de plus en plus pret lol

texte texte texte texte texte
texte texte texte
motcle1 exte texte exte exte texte texte
motcle2
texte texte
texte

le "t" en moins dans "mocle2" c'est fait expres?

Je pensais que c'était une faute de frappe mais en remmettant le t je n'ai plus aucun changement par rapport au fichier d'origine :

texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte

Réponse 11 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Là je sèche :-((

Chez moi tout marche bien ;-\

Je parierai plus sur le fait que tu sois sur AIX, doit y avoir (je ne sais où) des interactions entre sed et le shell ;-\

Réponse 12 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Tu peux toujours essayer avec "ed" :

[tmpfs]$ cat plop
texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte

[tmpfs]$ ed -s plop <<<$'/motcle1/,/motcle2/g/$/s/.$/& /g\n/motcle1/,/motcle2/-1j\nw'

[tmpfs]$ cat plop
texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte
motcle2
texte texte
texte
[tmpfs]$

;-))

Réponse 13 / 15

vanhell

Rebonjour!
Non ça ne fonctionne pas sur cette machine avec ed, la shell est ksh ça vient surement de la.
Il faudrait trouver une solution avec awk ou perl...

Réponse 14 / 15

lami20j Messages postés 21331 Date d'inscription Statut Modérateur, Contributeur sécurité Dernière intervention 3 570

Salut,

$ cat fichier.txt
texte texte texte texte texte
texte texte texte
motcle1
texte texte
texte
texte texte texte
motcle2
texte texte
texte
$ perl -ne 's/\n/ / if /motcle1/../motcle2/;s/motcle2 /\nmotcle2\n/;print' fichier.txt
texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte
motcle2
texte texte
texte

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Merci ;-))

vanhell

Salut,
Merci ça fonctionne bien, même un peu trop lol j'explique :

$cat fictest
CONNECT TO ORACLE (&CONXORA);
CREATE TABLE ALIAS.TABLECREEE AS
SELECT ID_PERS,
ID_GRP_PERS, AGE_PERS
NB_ENF, MAX('GRP') AS MAXG
FROM TAB_PERS_GRP_PERS
WHERE DATE_DEB <= &DATE_FIN
AND (DATE_FIN IS NULL OR DATE_DEB > &DATE_FIN)
);
DISCONNECT FROM ORACLE;

perl -ne 's/\n/ / if /SELECT/../FROM/;s/FROM /\nFROM\n/;print' fictest

CONNECT TO ORACLE (&CONXORA);
CREATE TABLE ALIAS.TABLECREEE AS
SELECT ID_PERS, ID_GRP_PERS, AGE_PERS NB_ENF, MAX('GRP') AS MAXG
FROM
TAB_PERS_GRP_PERS WHERE DATE_DEB <= &DATE_FIN
AND (DATE_FIN IS NULL OR DATE_DEB > &DATE_FIN)
);
DISCONNECT
FROM
ORACLE;

Il faudrait que ça change juste entre SELECT et FROM donc ça c'est bon, mais la ça rajoute aussi un retour à la ligne après FROM et des retour à la ligne apres chaque mot de la dernière ligne (si ça peut aider pour ne pas prendre en compte "DISCONNECT FROM ORACLE" , les mots clés "SELECT" et "FROM" sont toujours en début de ligne.
Merci d'avance

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896 > vanhell

Essaye comme ça :

perl -ne 's/\n/ / if /SELECT/../^FROM/;s/^FROM /\nFROM /;print'

;-))

vanhell > jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention

Presque!
Ca fonctionne mais ça enleve toujours le retour a la ligne avant le "WHERE"

J'obtient ça :

CONNECT TO ORACLE (&CONXORA);
CREATE TABLE ALIAS.TABLECREEE AS
SELECT ID_PERS, ID_GRP_PERS, AGE_PERS NB_ENF, MAX('GRP') AS MAXG
FROM TAB_PERS_GRP_PERS WHERE DATE_DEB <= &DATE_FIN
AND (DATE_FIN IS NULL OR DATE_DEB > &DATE_FIN)
);
DISCONNECT FROM ORACLE;

et il faudrait ça :

CONNECT TO ORACLE (&CONXORA);
CREATE TABLE ALIAS.TABLECREEE AS
SELECT ID_PERS, ID_GRP_PERS, AGE_PERS NB_ENF, MAX('GRP') AS MAXG
FROM TAB_PERS_GRP_PERS
WHERE DATE_DEB <= &DATE_FIN
AND (DATE_FIN IS NULL OR DATE_DEB > &DATE_FIN)
);
DISCONNECT FROM ORACLE;

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896 > vanhell

Va falloir attendre lami20j, n'étant pas un grand spécialiste de Perl pour ma part, désolé ;-(

Sinon, j'ai ça avec "ed" (essaie on sait jamais) :

echo 'H
/SELECT/,/^FROM/g/$/s/.$/& /g
/SELECT/,/^FROM/-1j
,p' | ed -s fic

;-))

Réponse 15 / 15

jipicy Messages postés 40842 Date d'inscription Statut Modérateur Dernière intervention 4 896

Et comme ça :

[tmpfs]$ echo 'H
/motcle1/,/motcle2/g/$/s/.$/& /g
/motcle1/,/motcle2/-1j
.
w' | ed -s plop

???

Édit : C'est plus simple comme ça...

Version affichage :

$ echo '/motcle1/,/motcle2/g/$/s/.$/& /g
/motcle1/,/motcle2/-1j
,p' | ed -s plop
texte texte texte texte texte
texte texte texte
motcle1 texte texte texte texte texte texte
motcle2
texte texte
texte

Version écriture :

$ echo '/motcle1/,/motcle2/g/$/s/.$/& /g
/motcle1/,/motcle2/-1j
w' | ed -s plop

;-))

Discussions similaires

Cacher une commande amazon en 2025

Ma commande est en cours de validation sur Fnac

Pip n'est pas reconnu en tant que commande interne

Masquer une commande amazon

supprimer commandes masquées

Votre réponse

Discussions similaires