[langage] fichier DOS et unix, retour chariot Mac unix

Bonjour,

je travaille sur MAC et je fais du CGI et du perl.

dans mon CGI, je créée un fichier ( qui contient les données saisies par l'utilisateur ds le formulaire) Mon pbl est que ce fichier, je ne sais pourquoi, est un fichier DOS et je voudrais qu'il soit un fichier Unix.
dc on m'a dit de changer les news lines DOS contre des news lines Unix
avec la commande

Citation:

---

tr '\015' '\012' < mac.txt > unix.txt

---

mais je ne sais pas comment l'introduire dans mon code qui est :

Code:

---

1 2 3 4

open F2, "> /Users/audrey/Sites/tmp/fichier_saisie" or die "erreur d'ouverture dans le fichier_saisie \n"; print F2 "$input{'fichier_saisie'}"; close F2;

---

Merci

Code:

---

1 2 3 4 5

open F2, "> /Users/audrey/Sites/tmp/fichier_saisie" or die "erreur d'ouverture dans le fichier_saisie \n"; tr '\015' '\012' < mac.txt > unix.txt; print F2 "$input{'fichier_saisie'}"; close F2;

---

en fait la ligne

Citation:

---

tr '\015' '\012' < mac.txt > unix.txt;

---

ne marche pas à cause des quotes, il faut que j'insère des caractères d'échappement mais je ne les connais pas en perl.

qlq'1 peut me renseigner?

merci

Il faut plutôt insérer

Code:

---

system( "tr '\015' '\012' < mac.txt > unix.txt" );

---

Le problème si tu fais du CGI c'est que tu n'auras peut être pas le droit d'utiliser la commande "tr", dans ce cas il faudra faire une boucle avec un "s/\r$//;".

P.S. : évite le crosspost

Je ne comprends pas trop ce que tu veux dire par

Citation:

---

il faut faire une boucle avec un "s/\r$//;"

---

pouvez- vous m'en dire plus merci?

ou avez-vous une autre proposition à me faire?


merci vraiment

merci j'ai pu résoudre mon pbl.