CSV ( comma-separated value ) est un format de fichier spécial utilisé pour transférer des données d'un tableur d'une application à une autre . Les données au format CSV sont stockées dans un fichier texte de base avec les valeurs de chaque ligne séparés par des virgules et chaque ligne séparés par un espace vide . Habituellement, mais pas toujours , la première ligne est utilisé pour donner le nom de colonnes. Par exemple , le texte suivant pourrait faire partie d' une feuille de calcul CSV pour les livres : "Titre ", " Auteur " " Roméo et Juliette ", " William Shakespeare" "Hamlet ", " William Shakespeare" Lire des fichiers CSV dans le langage de programmation Perl en utilisant le Text :: CSV bibliothèque . Instructions
1
Créer un nouveau fichier texte dans un éditeur de texte. N'importe quel éditeur de texte fera l'affaire, y compris Windows Notepad , mais le fichier doit se terminer par l'extension de fichier " . Pl" et non pas " . Txt " ou " . Rtf . "
2
Colle la signature suivante à la première ligne du fichier de texte. Bien que non requis , il est utile si vous distribuez votre travail aux autres ou oubliez plus tard quelle langue le script utilise .
#! /Usr /bin /perl
3
Ajoutez la ligne suivante dans le fichier texte à importer la bibliothèque d'analyse CSV Perl :
use Text :: CSV;
4
Parse et imprimer le contenu d'un fichier CSV en collant ces lignes :
my $ input = " file.csv ';
my $ parser = Text :: CSV -> new ();
ouvert ( CSV, "<", $ input ) ;
while ( ) { if ($ parser- > parse ( $ _ ) ) { my @ columns = $ parser- > Champs ( ) ; print " @ colonnes \\ n"; } } close CSV; .
remplacer « file.csv » avec le nom du fichier CSV pour analyser