16 février 2007

Convertir un objet PERL en XML avec XML::Dumper

Comment convertir un objet PERL en XML et stocker le résultat dans un fichier XML?C'est tout simple avec la méthode pl2xml de XML::Dumper. Télécharger le module XML::Dumper :http://search.cpan.org/CPAN/authors/id/M/MI/MIKEWONG/XML-Dumper-0.81.tar.gzInstallation du module :tar -xzf XML-Dumper-0.81.tar.gzcd XML-Dumper-0.81perl Makefile.PLmake install Code PERL :use XML::Dumper; #définir votre objet PERL $objPerl $dump  = new XML::Dumper;$xml     =... [Lire la suite]
Posté par fatihaelh à 10:22 - - Commentaires [3] - Permalien [#]

14 février 2007

Conversion de CSV en XML en PERL

Vous avez un fichier CSV avec des entêtes indiquant le nom des champs, vous voulez convertir ce fichier en XML, comment faire? Première chose à faire : télécharger deux modules PERL. http://search.cpan.org/~isterin/XML-CSV-0.15/CSV.pm http://search.cpan.org/~jwied/Text-CSV_XS-0.23/CSV_XS.pm Deuxième chose à faire : installer ces modules. tar -xzf XML-CSV-0.15.tar.gzcd XML-CSV-0.15perl Makefile.PLmake installtar -xzf Text-CSV_XS-0.23.tar.gz cd Text-CSV_XS-0.23 perl Makefile.PL make install A quoi ressemble le fichier... [Lire la suite]
Posté par fatihaelh à 15:28 - - Commentaires [0] - Permalien [#]
19 octobre 2006

NET::ftp, envoi de fichiers par ftp en perl

Comment faire en quelques lignes pour envoyer un fichier par FTP en perl?inclusion de la bibliothèque NET::FTPuse NET::FTP;      définir vos variables my $FTP_HOST= "host"; my $FTP_USER = "user";my $FTP_PASSWORD = "pass";my $FTP_REP_DISTANT= "/path/to/";my $filename = "myFile"; ici c'est la manière la plus simple de déposer un fichierpour plus d'arguments , cf. la méthode new en détail $ftp = Net::FTP->new($FTP_HOST, Debug => 0) ... [Lire la suite]
Posté par fatihaelh à 17:18 - - Commentaires [1] - Permalien [#]
18 octobre 2006

MIME::Lite, envoi d'un fichier csv par mail

Comment faire pour envoyer un fichier csv par mail en PERL? use MIME::Lite;my $from      = "test\@test.com";            my $to          = "demo\@demo.com";my $file        = "/path/to/test.csv";my $subject  = "Test envoi de fichier csv";$msg = MIME::Lite->new(         To      =>"$to", ... [Lire la suite]
Posté par fatihaelh à 13:09 - - Commentaires [0] - Permalien [#]
17 octobre 2006

NET::sftp, ouvrir une session sFTP en perl

Comment utiliser cette bibliothèque : Net::SFTP?inclure la bibliothèque en haut du fichier perluse Net::SFTP; ouvrir une session sFTP sans argumentsmy $sftp = Net::SFTP->new($host); ouvrir une session sFTP avec un user et un mot de passe%args est un tableau de hachage contenant les informations nécessairesmy %args = (user=>"toto", password=>"titi");my $sftp = Net::SFTP->new($host,%args); ouvrir une session avec des informations de débugsidem utiliser %argsmy %args = (debug... [Lire la suite]
Posté par fatihaelh à 12:01 - - Commentaires [0] - Permalien [#]
11 octobre 2006

Use of uninitialized value? Comment éviter cette erreur en perl?

Qui n'a jamais eu cette erreur en codant en perl? Use of uninitialized value... Je suis de celle qui a tout essayé: if($variable==undef) if($variable eq "")if($variable eq 0)etc... et je viens enfin de trouver : if(!defined($variable)) Comment lire cette expression? Lire if not defined (et oui j'ai piqué cette syntaxe au php;))
Posté par fatihaelh à 16:32 - - Commentaires [0] - Permalien [#]

06 octobre 2006

Suppression des sauts de ligne en PERL

Pour supprimer des sauts de ligne en perl, nous utilisons la recherche et la substitution de motifs : $mavariable =~ s/\n//gs; Cette expression peut se décomposer comme suit : =~ opérateur de subsitution en perl entre les deux premiers slashs // on a le motif recherché ici /\n/, ici on recherche /n qui signifie saut de ligne. entre le deuxième et le troisième slash on a le motif remplaçant le motif recherché, //, ici il n'y a rien, cela signifie tout simplement  que le saut de ligne sera remplacé par du vide, il... [Lire la suite]
Posté par fatihaelh à 11:48 - - Commentaires [0] - Permalien [#]
06 octobre 2006

Retirer les balises HTML en perl

Vous souhaitez convertir du html en texte, une manière simple et qui tient en une ligne :   $mavariable = s/<(?:[^>'"]*|(['"]).*?\1)*>//gs;   Pour en savoir plus
Posté par fatihaelh à 11:33 - - Commentaires [1] - Permalien [#]
01 juillet 2004

Programmation PERL

Fichiers en PERL - donner le nom du fichier à ouvrir,- ouvrir le fichier,- stocker dans un tableau les données,- afficher le contenu et fermer le fichier.Plus tard, on rajoutera quelques tests car là c'est très rudimentaire. //on peut récupérer le nom du fichier en entrée : $nom_fichier =  <stdin>;$nom_fichier = « mail.txt » ;//FIC_MAIL est un descripteur de fichiers//open est un appel... [Lire la suite]
Posté par fatihaelh à 22:08 - - Commentaires [0] - Permalien [#]
02 juin 2004

Mes premiers pas en PERL

Je connais un peu PERL, cet article ne sera pas rédigé de la même manière que celui sur JAVA. Je vais traiter en gros les parties importantes nécessaires à la programmation : types de variables, fonctions, fichiers, modules et bibliothèques, expressions régulières, PERL CGI. Je compte sur vous pour corriger mes éventuelles erreurs ;) Téléchargement et installation Pour Windows, aller sur le site : http://www.activestate.com/ActivePerl/Installez-le dans C:\Perl, c'est plus pratique.Comme éditeur, j'utilise ScriptEdit mais... [Lire la suite]
Posté par fatihaelh à 16:00 - - Commentaires [0] - Permalien [#]