Discussion :

[zen38]

Bonjour,

Comment je pourrai insérer un retour à la ligne avec la commande sed à travers cygwin, ou avec un script perl dans un fichier txt contenant:
<A> blablabla </A><B>blablabla</B><A>blabla..</A>... etc

ce que je veux obtenir:
<A> blablabla </A>
<B>blablabla</B>
<A>blabla..</A>
...etc

Merci

[ggnore]

Code :

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

echo "<A> blablabla </A><B>blablabla</B><A>blabla..</A>" | sed "s/></>\n</g"

Code :

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

1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl
 
use strict;
use warnings;
 
my $bla="<A> blablabla </A><B>blablabla</B><A>blabla..</A>";
 
$bla =~ s/></>\n</g;
 
print $bla;

[6ril23]

Code :

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

echo "<A> blablabla </A><B>blablabla</B><A>blabla..</A>" | sed "s/></>\n</g"

Code :

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

1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl
 
use strict;
use warnings;
 
my $bla="<A> blablabla </A><B>blablabla</B><A>blabla..</A>";
 
$bla =~ s/></>\n</g;
 
print $bla;

Chez moi la regex avec sed ne fonctionne pas car "\n" doit renvoyer "n"
j'ai essayé:

Code :

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

1
2
# Attention si tu veux garder la modif dans le même fichier il faudra passer par un fichier temporaire
sed "s/></>\\\n</g" test.txt > result.txt | mv -f result.txt test.txt

où le fichier contient ta ligne et j'obtiens

Code :

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

<A> blablabla </A>\n<B>blablabla</B>\n<A>blabla..</A>

a priori il n'interprète pas le "\n" comme un retour à la ligne

si tu veux le faire en perl, tu ne pourras pas non plus enregistrer directement la modif dans le fichier d'origine

Code :

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

perl -e 'open(FIC_IN, "test.txt"); my @lignes; while (<FIC_IN>){print $_; $_=~s/></>\n</g; print ">$_<"; close(FIC_IN);push(@lignes, $_);} open(FIC_OUT, ">", "test2.txt"); foreach my $line (@lignes){print FIC_OUT "$line";}'

[Lolo78]

En Perl avec du texte à la ligne de commande:

Code :

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

echo "<A> blablabla </A><B>blablabla</B><A>blabla..</A>" | perl -e 's/></>\n</g'

si tu veux le faire en perl, tu ne pourras pas non plus enregistrer directement la modif dans le fichier d'origine

Si, si, c'est tout à fait possible, par exemple avec un fichier nommé 'nom_fichier.txt' :

Code :

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

perl -i.bak -pe 's/></>\n</g' nom_fichier.txt

Le fichier d'origine non modifié sera renommé en nom_fichier.txt.bak et les modifications apparaîtront dans le fichier nom_fichier.txt. Et la syntaxe est bien plus concise.

[6ril23]

Si, si, c'est tout à fait possible, par exemple avec un fichier nommé 'nom_fichier.txt' :

Code :

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

perl -i.bak -pe 's/></>\n</g' nom_fichier.txt

je connaissais pas car j'utilise peu perl en ligne de commande mais en effet c'est beaucoup plus simple

[zen38]

Chez moi la regex avec sed ne fonctionne pas car "\n" doit renvoyer "n"
j'ai essayé:

Code :

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

1
2
# Attention si tu veux garder la modif dans le même fichier il faudra passer par un fichier temporaire
sed "s/></>\\\n</g" test.txt > result.txt | mv -f result.txt test.txt

où le fichier contient ta ligne et j'obtiens

Code :

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

<A> blablabla </A>\n<B>blablabla</B>\n<A>blabla..</A>

a priori il n'interprète pas le "\n" comme un retour à la ligne

si tu veux le faire en perl, tu ne pourras pas non plus enregistrer directement la modif dans le fichier d'origine

Code :

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

perl -e 'open(FIC_IN, "test.txt"); my @lignes; while (<FIC_IN>){print $_; $_=~s/></>\n</g; print ">$_<"; close(FIC_IN);push(@lignes, $_);} open(FIC_OUT, ">", "test2.txt"); foreach my $line (@lignes){print FIC_OUT "$line";}'

ton script fonctionne parfaitement merci bien , mais je viens de me rendre compte que parfois dans mon txt il y a un espace entre </A> et <B>, du coup il ne fait pas un retour à ligne pour ces cas , je vais essayer de résoudre ça ..

[Lolo78]

Essaie ceci:

Code :

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

perl -i.bak -pe  's/>\s*</>\n</g'  nom_fichier.txt