Discussion :

[sorilazer]

salut tt le momde !!
Est ce quelqu'un pourra me donner le code en perl pour compresser au format gzip un fichier? merci

[djibril]

chercher dans le

[Jedai]

Tu as un exemple sur ce sujet (même si ce n'est qu'une petite partie du script...) :
http://www.developpez.net/forums/sho...d.php?t=358693

--
Jedaï

[sorilazer]

merci pour vos aides. En fin j'ai trouvé la methode. elle est tres simple. voici le code en perl :

Code :

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

1
2
3
4
5
6
7
8
 
 
sub compressFile
 {
  $myFileZip = "toto.txt";
  system("gzip -c $myFileZip > $myFileZip.gz");
# avec l'option c de gzip on compresse en conservant  le nom d'origine
 }

[djibril]

LA solution que tu propose n'est vraiment pas propre capas portable.
Tu utilise tout simplement une commande system.
L'interet aurait ete d'utiliser un module perl qui te le crée tout simplement.