Discussion :

[mahmoudelect]

Bonjour tt le monde,

Est ce que vous pouvez me montrer comment créer des fichiers csv en ecriture avec des scripts en Perl sous Linux?
merci

[Schmorgluck]

En écrivant tes données dans un fichier avec le séparateur que tu souhaites...

Je ne comprends pas vraiment quel est ton problème.

[Philou67430]

Il existe aussi une palanquée de modules, dont Text::CSV
Mais pour écrire un fichier csv, il est très simple d'utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print join($separator, @colonnes), "\n";

[mahmoudelect]

merci, j'ai trouvé comment faire
pour créer un fichier en ecriture dans perl:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
use FileHandle;
$fileCSV="/usr/lib/perl5/site_perl/5.10.0/testFile.csv"; #adresse du fichier
open (F, ">$fileCSV"); #ouvrir le fichier en ecriture
print F "message à écrire\n";#pour écrire dans le fichier
close F;#fermeture du fichier.

[djibril]

La FAQ Perl pourra t'aider, tout y est, n'hésite pas.

[Philou67430]

Si ton problème était l'ouverture d'un fichier, alors dans ce cas :
- le use FileHandle n'est pas nécessaire
- je te conseille l'écriture à trois arguments de open : open F , ">", $fileCSV
- éventuellement, je te conseille l'usage d'un filehandle sous forme d'une variable scalaire ($F par exemple), au lieu d'un bareword (comme ici, F).