perl est conçu pour la lecture et la manipulation des données de texte. Il est facile de manipuler ses trois structures de données de base ( le scalaire , la liste et le hash ) parce que l'interpréteur Perl peut taper sur la base des données contextuelles . Le format de données les plus fréquemment manipulés en Perl sont les valeurs séparées par des virgules . Instructions 1 Ouvrez le fichier de données, si vous ne lisez pas les données de STDIN ou de données. Utilisez un descripteur de fichier qui est facilement identifiable : " CSVFILE ouverte", test.csv ";" 2 lire les données. Avec de petits fichiers , vous pouvez lire toutes les lignes à la fois. Pour les gros fichiers , vous devriez être lu une seule ligne à la fois et de les traiter avant de lire la ligne suivante. Ici, le support " syntaxe de magie " angle de lecture de toutes les lignes est utilisée pour lire toutes les lignes dans le tableau @ lignes: "@ lignes = ;" 3 dépouiller les sauts de ligne le la fin de chaque ligne , à l'aide de la fonction de la carte . Les sauts de ligne ne sont pas nécessaires, car ils n'ont pas de sens une fois que toutes les lignes sont lues po La fonction de carte va appeler le bloc passé comme premier argument de chaque élément de la liste : " carte ( {chomp } @ lignes) ; " < br > Hôtels 4 divisé les lignes. Les valeurs séparées par des virgules doivent être divisés en tableaux, qui peuvent être réalisées en utilisant la fonction de carte scission et . Les lignes seront rejoints de façon similaire lorsque les données seront imprimées à nouveau. " @ lines = map ( { [SPLIT /, /]} @ lignes) ; ». 5 manipuler les données , maintenant que toutes les données en mémoire est dans un format facilement accessible 6 boucle sur eux avec le mot-clé foreach. Le mot-clé foreach exécute un bloc pour chaque élément dans un tableau , en attribuant à chaque élément du tableau , une référence à la variable par défaut. Cet exemple suppose que le second champ ( indice de tableau 1) contient une valeur numérique, et ajoute 20 à cela . Toutes les autres manipulations , y compris les mathématiques et les manipulations de chaînes , peuvent être effectuées d'une manière similaire: « foreach ( @ lines ) { $ _ -> [ 1] + = 20; }" 7 Rejoindre l' données avant qu'il ne puisse être reprise dans un fichier csv . Les champs doivent être rejoint par des virgules : "@ lignes = map ({ rejoindre ", " , @ { $ _ }} @ lignes) ; " 8 imprimer les données. Encore une fois, vous fera une boucle sur les lignes @ , mais cette fois seulement imprimer chaque ligne. Ici, les lignes sont imprimées à STDOUT , mais vous pouvez tout aussi bien ouvrir un autre fichier et d'impression à cela: ; < "{ \\ n" foreach ( @ lines ) print $ _ . "}" br>
|