Perl MAC et Windows

Bonjour à tous,

Je viens vous demander un petit coup de main,

J'ai un fichier CSV remplit de retour chariot et je veux créer un nouveau CSV sans ces retours chariot, pour cela j'utilise une commande Perl :

Code:

---

perl -pe 's/\n/ /g' Chemin fichier 1 > Chemin fichier 2

---

Sous Mac cette commande marche super bien, mais sous Windows même en l’adaptant je n'arrive pas au même résultat ...

Commande Windows :

Code:

---

perl -pe "s/\n/ /g" Chemin fichier 1 > Chemin fichier 2

---

(Guillemet à la place des quotes)

Avez-vous une solution pour adapter cette commande sous Windows ?

Merci à tous !

Bonsoir,

Sous Windows, les retours à la ligne comprennent deux caractères (retour chariot + saut de ligne) au lieu d'un seul sous Unix et (les versions récentes de) Mac.

Essaie ceci:

perl -pe "s/[\r\n]+/ /g" Chemin fichier 1 > Chemin fichier 2

Compatibilité Unix/Mac/Linux/Windows des fichiers (^M)

Bonjour Lolo78,

merci de ton aide j'ai testé ton idée mais j'ai un message d'erreur : Substitution replacement not terminated at -e line 1

djibril j'ai regardé ton lien j'ai testé quelques trucs mais aucun résultat comme sous mac ...

A priori, tu as du mal copier mon code (oublié un caractère). Je le remets entre balises:

Code:

---

1 2	perl -pe "s/[\r\n]+/ /g" fic1 > fic2

---

Et je viens de ressayer, mon code compile sans erreur.

Si ça ne marche toujours pas, poste la commande exacte que tu fais.

Bonjour Lolo78,

Le code compile sans erreur mais je n'obtiens toujours pas le même résultat .. :(

Sous Mac :

Pièce jointe 191590


Sous Windows :

Pièce jointe 191591

On voit bien la différence sur les captures d'écran les retours charriots sont annulés mais sous Mac la ligne Cadillac est renvoyé à la ligne alors que sous Windows non :s

Je vois pas pourquoi cette différence ...

Merci de ton aide !

Ca devrait être équivalent mais essaye

Code:

---

1 2	Taisha:~/perl/forum $ perl -e 'while (<>) {s/[\r\n]+/ /g; print}' fic1 > fic2 Taisha:~/perl/forum $

---

testé (sur windows seulement...) avec

Code:

---

1 2 3 4

Taisha:~/perl/forum $ perl -e 'print "a\rb\nc\r\nd"' > fic1 Taisha:~/perl/forum $ perl -e 'while (<>) {s/[\r\n]+/ /g; print}' fic1 > fic2 Taisha:~/perl/forum $ cat fic2 a b c dTaisha:~/perl/forum $

---

Bonjour,

peux-tu mettre en pièce attachée tes trois fichiers, un avant et les deux après le traitement sous Mac et sous Windows? Un copier-coller de l'affichage à l'écran ne permet en aucun cas de se rendre compte du contenu réel du fichier (surtout si l'affichage n'est pas fait avec le même logiciel, comme c'est sans doute le cas).

Bonjour,

Je vais tester la technique de cmcmc

Pour Lolo78 voici les fichiers :

Fichiers

Fichier 1 : brut avec les retours charriots
Fichier Mac : fichier de sortie après la commande Mac
Fichier Windows = Fichier de sortie après la commande Windows

Merci !