(sed) Enlever le

Résolu
titexe Messages postés 55 Statut Membre -  
titexe Messages postés 55 Statut Membre -
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

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

    Bonne chance
    0
    1. titexe Messages postés 55 Statut Membre 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
  2. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    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
    1. titexe Messages postés 55 Statut Membre 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
  3. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    Oups,

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

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

      Merci
      0
  4. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    Essaie
    sed -i.orig s/=[\r\n]+// fichier
    --
    lami20j
    0
    1. titexe Messages postés 55 Statut Membre 1
       
      ca marche pas !!!
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

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

    la commande n'était pas bonne

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

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

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

      merci
      0
  9. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    Salut,
    perl -pi.orig -e 's/=\r\n//' fichier 
    --
    lami20j
    0
  10. titexe Messages postés 55 Statut Membre 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
  11. jipicy Messages postés 40842 Date d'inscription   Statut Modérateur Dernière intervention   4 898
     
    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
  12. titexe Messages postés 55 Statut Membre 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
  13. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    Salut,

    affiche
    perl -ne 's/(.)/ord($1)/eg' fichier_original
    --
    lami20j
    0
    1. titexe Messages postés 55 Statut Membre 1
       
      bonjour,

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

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

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

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

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

      641245757124798212457571246784124504848544949485449484856124504848541244912412480691246567846983124124124124
      661245048485412449124495012456495148124495049494849504848484848484849485550124504848541244948555712457124798566697675656769773261
      6983836565687365124525753464812478124545553561244957474852475048485412450554812412412412448464812480124685454564954491245149474856475048485412410511010010110911010511661
      10132102111114102971051169710511410132100117324849474854475048485432971173251494748564750484854124484648124124124124124124124124124671243212432124

      merci,
      0
      1. titexe Messages postés 55 Statut Membre 1 > titexe Messages postés 55 Statut Membre
         
        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
  16. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    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
    1. titexe Messages postés 55 Statut Membre 1
       
      oui je travaille sur le meme fichier mfm1dYJbFc_test.dc (cjoint)
      0
  17. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    C'est bizarre.

    Je verrai ce soir.
    Tu peux compresser le fichier et le passer par e-mail (regarde mon profil)
    0
  18. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    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
  19. lami20j Messages postés 21506 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 571
     
    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
    1. 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
  20. titexe Messages postés 55 Statut Membre 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
  • 1
  • 2