(sed) Enlever le

Résolu
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   -  
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

j'ai un nouveau petit point à traiter avec sed, dont j'ai besoin de votre aide,

ce fichier contient sur chaque fin de ligne ou il y'a un retour chariot "=", quand j'ai fais set list, j'ai detecté qu'aprés chaque "=" , y'a un caractére caché "$",

comment peut on enlever ce caractére "=" et le caractére caché "$" qui va éleminer le retour chariot?

ex fichier :

@|99|OR|99|CT|200611061008|2006|1||PE|ACTES||||
B|2006|1|12|8130|121101200000001072|2006|1079|9|AAAAAA =
AAAAAAAAA|495.0|N|6758|19/04/2006|270||||0.0|P|D668161|31/08/2006|indemnit=
e forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
B|2006|1|12|8131|121101200000001072|2006|1079|9|BBBB =
BBBBBBB|495.0|N|6758|19/04/2006|270||||0.0|P|Z346370|31/08/2006|indemnit=
e forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
&|2|

le resultat attendu c est :

@|99|OR|99|CT|200611061008|2006|1||PE|ACTES||||
B|2006|1|12|8130|121101200000001072|2006|1079|9|AAAAAA AAAAAAAAA|495.0|N|6758|19/04/2006|270||||0.0|P|D668161|31/08/2006|indemnite forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
B|2006|1|12|8131|121101200000001072|2006|1079|9|BBBB BBBBBBB|495.0|N|6758|19/04/2006|270||||0.0|P|Z346370|31/08/2006|indemnit
e forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
&|2|

le résultat doit contenir 4 lignes.

D'avance merci,

Cordialement,

21 réponses

mamiemando Messages postés 33772 Date d'inscription   Statut Modérateur Dernière intervention   7 882
 
Si c'est juste suprimer les = en fin de ligne ca donne, si je ne m'abuse :
sed 's/=$//g' fichier

Bonne chance
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
merci pour votre réponse ,

je voudrais juste savoir , comment exécuter la meme commande avec un sed sous windows ,

voila l'erreur qui m'affiche :

D:\Program Files\GnuWin32\bin>sed 's/=$//g' F0007913.dc
sed: -e expression #1, char 1: unknown command: `''

Merci d'avance
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,
sed -i.orig /=[\r\n]*// fichier
Il faut l'option -i pour editer le fichier en place

Après = il y a un \r ou \n qu'il faut le supprimer.

Je n'ai pas testé :-) mais -i.orig sauvegarde le fichier
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour Lami20j,

ca va ?

meme avec cette derniére commande et ca marche pas ;

D:\Program Files\GnuWin32\bin>sed -i.orig /=[\r\n]*// F0007913.dc
sed: -e expression #1, char 11: unknown command: `/'

D:\Program Files\GnuWin32\bin>sed -i /=[\r\n]*// F0007913.dc
sed: -e expression #1, char 11: unknown command: `/'

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

essaie comme ça
sed -i.orig s/=[\r\n]*// fichier
j'ai oublié le s
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
re,

ça marche !! mais les retours chariot existe toujours,

Merci
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Essaie
sed -i.orig s/=[\r\n]+// fichier
--
lami20j
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
ca marche pas !!!
0

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

Posez votre question
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Essaie ça
perl -pi.orig -e 's/(\d=)\r?\n?/$1/' fichier
--
lami20j
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
meme résultat que la derniére commande sed!!
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Re,

la commande n'était pas bonne

essaie
perl -pi.orig -e 's/=\s*\r?\n?//' fichier
--
lami20j
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
meme en perl , chér ami !!
ca marche pas , le retour chariot existe toujours !!

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

alors passe moi ton fichier sur cjoint.com et je vais voir

merci
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
ci-joint le fichier test.dc

et voila le lien : https://www.cjoint.com/?mfm1dYJbFc

Cordialement,
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,
perl -pi.orig -e 's/=\r\n//' fichier 
--
lami20j
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
bonjour,

je sais pas pourquoi ca marche pas chez moi , je l'ai testé plusieurs fois , sous unix et windows et toujours le meme résultat?
0
jipicy Messages postés 40842 Date d'inscription   Statut Modérateur Dernière intervention   4 896
 
Salut,

Essaye ça :
sed 's/=*^M$//' mfm1dYJbFc_test.dc | cat -t 
Le "^M" s'obtient par la combinaison de touches :
(CTRL+V) + (CTRL+M)

;-))
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
bonjour,

pardonnez moi , je comprends pas pourquoi ca marche pas chez moi, voila qu es ce que j ai fait ?

/usr/test > sed 's/=*^M$//' mfm1dYJbFc_test.dc | cat –t

@|99|OR|99|CT|200611061008|2006|1||PE|ACTES||||
B|2006|1|12|8130|121101200000001072|2006|1079|9|OUBELKACEM =
ESSAADIA|495.0|N|6758|19/04/2006|270||||0.0|P|D668161|31/08/2006|indemnit=
e forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
B|2006|1|12|8131|121101200000001072|2006|1079|9|OURYA =
OUIDYANE|495.0|N|6758|19/04/2006|270||||0.0|P|Z346370|31/08/2006|indemnit=
e forfaitaire du 01/06/2006 au 31/08/2006|0.0|||||||||C| | |
&|2|

comment vous expliquez ca ?

je compte sur vous pour m'aider a résoudre ce probléme, merci d'avance.

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

affiche
perl -ne 's/(.)/ord($1)/eg' fichier_original
--
lami20j
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
bonjour,

/usr/test > perl -ne 's/(.)/ord($1)/eg' mfm1dYJbFc_test.dc

il m'affiche rien
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Attention,

je n'ai pas dit /usr/test >
tape ça
perl -ne 's/(.)/ord($1)/eg' mfm1dYJbFc_test.dc 
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
perl -ne 's/(.)/ord($1)/eg' mfm1dYJbFc_test.dc

il m'affiche rien du tt
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
oups, c'est ma faute, j'ai oublié le print :-)
perl -ne 's/(.)/ord($1)/eg;  print' mfm1dYJbFc_test.dc 
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
voila le résultat :

perl -ne 's/(.)/ord($1)/eg; print' mfm1dYJbFc_test.dc

641245757124798212457571246784124504848544949485449484856124504848541244912412480691246567846983124124124124
661245048485412449124495012456495148124495049494849504848484848484849485550124504848541244948555712457124798566697675656769773261
6983836565687365124525753464812478124545553561244957474852475048485412450554812412412412448464812480124685454564954491245149474856475048485412410511010010110911010511661
10132102111114102971051169710511410132100117324849474854475048485432971173251494748564750484854124484648124124124124124124124124124671243212432124

merci,
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1 > titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention  
 
pour info,

le résultat : ca etais plusieurs lignes ou il y'a des numéros, j ai fait une copie seulement des premiéres lignes
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Il y a quelque chose qui ne va pas

tu vois les lignes qui se finissent avec 61?
61 c'est le code ASCII pour =
donc après 61 on devrait avoir 13 (enfin c'est ça que j'ai obtenu sur ton fichier que tu m'as donné par cjoint.com)

Tu travailles sur une portion de fichier ou sur le fichier entier?

0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
oui je travaille sur le meme fichier mfm1dYJbFc_test.dc (cjoint)
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
C'est bizarre.

Je verrai ce soir.
Tu peux compresser le fichier et le passer par e-mail (regarde mon profil)
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,

$ perl -ne 'print' mfm1dYJbFc_test.dc | wc -l
140
le fichier original a 140 lignes
$ perl -ne 's/=\r\n//;print' mfm1dYJbFc_test.dc | wc -l
42
le fichier après la suppresion (ici je fais juste un teste sans sauvegarder les modifications) de = et fin de ligne a 42 lignes
$ perl -ne 's/(.)/ord($1)/eg;print' mfm1dYJbFc_test.dc > ascii_test.dc
dans ce fichier je converti les caractères en code ASCII
tu va remarquer à la fin de certains lignes 6113 (chez toi je ne vois pas ça) - c'est = et carriage return
$ perl -ne 's/=\r\n//;print' mfm1dYJbFc_test.dc > suppegal_test.dc
je supprime = et caractère de fin de ligne et je sauvegarde le fichier
$ cat ascii_test.dc | wc -l
140
le fichier original (les caractères en ascii cette fois ci) a toujours 140 lignes
$ cat suppegal_test.dc | wc -l
42
le fichier obtenu a 42 lignes

Voici le fichier avec les caractères convertis en ASCII https://www.cjoint.com/?mit1YbzzmU
et le fichier obtenu après la suppression https://www.cjoint.com/?mit2uTW4mo
0
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Par exemple si je compte le nombre de = suit d'un carriage return j'obtiens 98 qui veut dire

140 - 98 = 42 donc le résultat que j'obtiens

calculer le nombre d'occurence = suit de carriage return
$ perl -e 'print scalar(map{/=\r\n/}`cat mfm1dYJbFc_test.dc`),"\n"'
98
0
titexe
 
Bonjour,

j'ai consulter le fichier (mit2uTW4mo_suppegal_test.dc),tout a fait c'est ca le résultat que je cherche !!!

je procéderais le lundi a faire la meme manipulation, et je vous tienderais au courant,

Merci beaucoup pour votre réactivité, et esperant que j obtienderais le meme résultat!!!

Merci encore une fois
0
titexe Messages postés 55 Date d'inscription   Statut Membre Dernière intervention   1
 
bonjour,

voila j'ai exécuté les meme commande et voila le résultat :

# perl -ne 'print' mfm1dYJbFc_test.dc | wc -l
141

# perl -ne 's/=\r\n//; print' mfm1dYJbFc_test.dc | wc -l
141

pourtant c'est le meme fichier,

y'a une seule chose que je le fais normalement avant le traitement de ce fichier , c est enlever ^M quand je le transfére du windows a unix. ( en éxutant un script dos2unix.sh)
0