Insert if pattern

Bonjour,

j'ai un fichier "monfichier" qui contient des blocs de lignes:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

xx toto1 yy toto2   xx titi1 yy titi2   xx tutu1 yy tutu2   xx tata1

---

J'ai besoin d'ajouter des lignes zz après chaque ligne yy , le reste de la ligne est identique à la précédente.

A noter que je travaille sur AIX donc pas de sed -i.

J'ai commencé par:

Code:

---

1 2 3

grep yy monfichier >> resultat perl -pi -e 's/yy/zz/g' resultat

---

et enfin

Code:

---

1 2 3 4

while read line do echo $line >> monfichier done < resultat

---

Le résultat est + ou moins celui attendu car j'ai toutes mes lignes zz en fin de "monfichier" alors que je voudrais les insérer après chaque ligne xx pour que mon fichier soit plus propre et plus lisible.
"monfichier" fait + ou - 500 blocs, je n'ai donc pas trop envie de le faire à la main. Comme il s'agit d'un fichier qui est utilisé en paramètre d'un batch, mes commandes ci-dessus font le job mais ça manque de maîtrise et mon fichier n'est pas "carré"

Je suis convaincu qu'un petit sed ou awk en une ligne doit être capable de faire ça.

Merci

salut,

je me mouille pas trop avec les différentes versions de sed/awk étant abonné Linux, mais Perl reste Perl :mrgreen: :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

$ perl -lne 'print; print $_ if s/^yy/zz/' fichier xx toto1 yy toto2 zz toto2   xx titi1 yy titi2 zz titi2   xx tutu1 yy tutu2 zz tutu2   xx tata1

---

Bonjour,
Une méthode pour remplacer le sed -i (Fait des tests pour maitriser le système car on efface le fichier que l'on modifie ici) :
Le fichier à modifier:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

$ cat /tmp/xx1.tt xx toto1 yy toto2   xx titi1 yy titi2   xx tutu1 yy tutu2   xx tata1

---

les actions de modifications (Les commandes sont bien dans le bon ordre) :

Code:

---

1 2 3

$ exec 3</tmp/xx1.tt $ rm /tmp/xx1.tt $ sed -n -e 'p' -e 's/^yy/zz/' -e '/^zz/p' <&3 >/tmp/xx1.tt

---

Le résultat:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

$ cat /tmp/xx1.tt xx toto1 yy toto2 zz toto2   xx titi1 yy titi2 zz titi2   xx tutu1 yy tutu2 zz tutu2   xx tata1

---

Bonjour,

Merci à vous,
j'ai testé la solution de BufferBob qui fait le job parfaitement,
en ce qui concerne celle de DISEDORGUE, tout est OK aussi mais j'avoue que j'aime moins les rm de fichiers.

Bonne année à vous .

salut,

Citation:

---

Envoyé par barbican82

en ce qui concerne celle de DISEDORGUE, tout est OK aussi mais j'avoue que j'aime moins les rm de fichiers.

---

en fait qu'on utilise perl -i, sed -i ou la solution de disedorgue il y a toujours un fichier temporaire, et donc un rm dans la foulée, la seule différence c'est que dans la dernière solution l'opération est explicite

on ne peut pas techniquement faire de l'édition "inplace" réelle, ou pour être plus exact, on ne peut pas faire de délétion ou d'insertion dans un fichier directement, dans le meilleur des cas on peut juste modifier remplacer quelques octets comme on le fait avec un éditeur hexadécimal par exemple

Edit: par contre on pouvait peut-être raccourcir avec sed -e '/^yy/{p;s/^yy/zz/}' ?

Il y a tout de même une petite différence entre la méthode que je propose via le rm et le cas des inplace de sed ou perl: dans le cas d'un plantage pour une raison ou une autre, on peut dans certaines circonstances, récupérer le fichier initial pour les inplace, tandis que dans la méthode rm, c'est du tout ou rien.
@Bufferbob: le sed aix supporte peut-être cette syntaxe (séparation par ; ), par contre, pour être plus portable, il manque un ; avant } (certains sed sont intransigeant la-dessus).
Mais +1 pour ta version qui corrige une restriction dans la mienne ( si dans le fichier, il y a le pattern '^zz' alors il affichera 2 fois la ligne ).