IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

Perl - remplacement hexadecimale


Sujet :

Langage Perl

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Par défaut Perl - remplacement hexadecimale
    Bonjour.

    Voici la chaîne $chaine:

    ¦¦PROBLèME DE à LA (MAN) xxxx
    ¦MAN¦¦2004/05/14¦

    Dans la première ligne il y a un line-feed à la fin. En réalité $chaine devrait être:

    ¦¦PROBLèME DE à LA (MAN)¦MAN¦¦2004/05/14¦

    Svp, en hexadécimal, comment remplacer 0D et 0A par 20 et récupérer le tout dans $chaine sur une seule ligne ?


    Merci.

  2. #2
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    Un truc du genre s/[\n\r]//g

    Sinon, pour mettre un caractère précis en hexadécimal, il faut écrire "\x0D" par exemple. s/[\x0A\x0D]//g conviendrait donc aussi.

    --
    Jedaï

  3. #3
    Membre averti
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Par défaut
    Bonjour.

    Merci pour votre réponse.

    En fait, je crois que si je pouvais remplacer la combinason "x20 x0D x0A" tout ensemble par un blanc (x20), ça pourrait régler mon problème.

    À partir de votre réponse j'ai essayé plusieurs variantes, mais je n'y arrive pas.

    Connaîtreriez-vous la syntaxe pour ce remplacement ?


    Mercio.

  4. #4
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    --
    Jedaï

  5. #5
    Membre averti
    Inscrit en
    Septembre 2005
    Messages
    16
    Détails du profil
    Informations forums :
    Inscription : Septembre 2005
    Messages : 16
    Par défaut Perl - remplacement hexadecimale
    Merci Jedai.

    Ça fonctionne mais il y a d'autres cas encore plus tordus...
    Finalement c'est à la source que le fichiers contenant ces anomalies a été corrigé.

    Merci encore.

  6. #6
    Expert confirmé
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Par défaut
    Citation Envoyé par Martin lalande Voir le message
    Finalement c'est à la source que le fichiers contenant ces anomalies a été corrigé.
    C'est toujours la meilleure correction, quand cela est possible, ça évite de se trimballer des morceaux de code sans queue ni tête dans tous les script qui lisent les fichiers produits.
    Appuie sur le bouton "Résolu" en bas du sujet.

    --
    Jedaï

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Rechercher Remplacer en Perl ou autre
    Par Ecomagnet dans le forum Langage
    Réponses: 1
    Dernier message: 08/02/2012, 09h27
  2. remplacement du awk en perl
    Par Avicen dans le forum Langage
    Réponses: 11
    Dernier message: 21/06/2007, 14h47
  3. [Perl] Problème de remplacement de chaine de caractères
    Par LE NEINDRE dans le forum Langage
    Réponses: 3
    Dernier message: 17/10/2006, 09h28
  4. [PERL]Remplacer un caractère dans on a le code ASCII
    Par LE NEINDRE dans le forum Langage
    Réponses: 4
    Dernier message: 30/09/2005, 15h13
  5. [langage] Comparer Perl avec d'autres langages comme C ?
    Par Anonymous dans le forum Langage
    Réponses: 3
    Dernier message: 10/08/2002, 23h52

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo