Discussion :

[roulia_rousset]

Bonjour,
Je cherche a convertir un tableau .csv en tableau Perl.
Je debute en Perl, et pr le moment je n'ai pas reussi a convertir ttes les lignes du .csv en un tableau a plusieurs lignes et plusieurs colonnes. Je n'arrive qu'a generer une liste ne tenant pas compte des retours a la ligne.

Le fichier .csv se presente comme suit :

Name,Frequency,,,,,Group,R/F,Invert,DC,MR,Mem
,OPP1,OPP2,OPP3,OPP4,OPP5,,,,,,
3D,300,300,300,,,A,R,NO,NO,NO,NO

et ainsi de suite.
Comment puis-je le convertir en un tableau Perl que je pourrais manipuler simplement avec les commandes @array[][]???

[iblis]

Le CPAN, que du bonheur :

Tie::CVS_File (exactement ce que tu demandes: tableau de tableau)
Text::CVS (le générique)
Tie::Handle::CVS (accès aux champs par un hash, enregistrement par enregistrement)

[roulia_rousset]

Merci pour l'info sur le CPAn mais il subsiste un probleme, je n'arrive pas a installer le module, l'erreur suivante s'affiche :

% perl Makefile.PL
Perl 5.006 required--this is only version 5.00503, stopped at Makefile.PL line 3.
BEGIN failed--compilation aborted at Makefile.PL line 3.

Comment puis-je installer le module qui m'interesse?

[Jedai]

Merci pour l'info sur le CPAn mais il subsiste un probleme, je n'arrive pas a installer le module, l'erreur suivante s'affiche :

% perl Makefile.PL
Perl 5.006 required--this is only version 5.00503, stopped at Makefile.PL line 3.
BEGIN failed--compilation aborted at Makefile.PL line 3.

Comment puis-je installer le module qui m'interesse?

L'erreur me semble pourtant assez explicite : ton Perl est trop vieux (il a environ 8 ans, la première version de Perl5.6 est sortie il y a 7 ans), soit tu en changes, soit tu recodes une partie du module, soit tu choisis un autre module.

--
Jedaï

[roulia_rousset]

Ok, j'avais compris l'erreur...mais comment modifier ds ce cas le code du module pr pouvoir l'installer???

[Jedai]

Ok, j'avais compris l'erreur...mais comment modifier ds ce cas le code du module pr pouvoir l'installer???

Je n'ai pas de boule de cristal et tu ne nous as même pas dit lequel des modules tu essaies d'installer. D'autant que tu te doutes que la modification du code n'est sans doute pas évidente, si le module a été déclaré ne marchant qu'à partir de la 5.6, il y a de bonnes chance qu'il utilise des fonctionnalités qui n'existaient pas avant.

--
Jedaï

[roulia_rousset]

De toutes manieres, je n'ai pas les droits pr installer quoique ce soir etant une etudiante ds une tres grosse entreprise.

Donc, quelqu'un pourrait-il m'aider pour le developpement de mon propre script pour passer mon tableau.csv en tableau PERL?
J'ai utilise la fonction split mais le probleme reste pour obtenir un tableau a plusieurs lignes...elle ne separe qu'en colonnes et ne traite pas ttes les lignes.

[Jedai]

De toutes manieres, je n'ai pas les droits pr installer quoique ce soir etant une etudiante ds une tres grosse entreprise.

Tu pourrais tout de même l'installer en local.

Une solution possible, bien que fragile (ben oui, utiliser un module c'est bien parce qu'il prend en compte la plupart des cas "spéciaux" comme les valeurs quotés, etc) :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#!/usr/bin/perl
use strict; use warnings;
 
# read the first line with fieldnames
my $first_line = <>;
chomp $first_line;
my @fieldnames = split m/,/, $first_line ;
 
# populate the array of data
my @data;
while(<>) {
  chomp;
  push @data, [split m/,/, $_, -1] if m/,/;
}
 
# do whatever the hell you want to do with the data
 
__END__

--
Jedaï

[roulia_rousset]

Merci beaucoup, desole de t'avoir fait galerer avec mes questions...
Ta solution marche et est largement suffisante pr l'utilisation que je dois en faire.
Il reste un petit probleme, la premiere ligne n'est pas traitee...ce n'est pas tres grave etant donnee que les informations ne sont pas contenues ds celle-ci, mais bon, si tu as une explication, ou une solution...

[Jedai]

Il reste un petit probleme, la premiere ligne n'est pas traitee...ce n'est pas tres grave etant donnee que les informations ne sont pas contenues ds celle-ci, mais bon, si tu as une explication, ou une solution...

La première ligne est traitée à part, c'est même marqué dans les commentaires... J'ai assumé que la première ligne contenait les noms des champs, donc je l'ai splitté dans @fieldnames.

--
Jedaï

[roulia_rousset]

Ok, je viens de le voir, j'avais pas fait attention...
Encore merci de tes reponses, je saurais a qui m'adresser pr d'autres pb......qd j'aurais eu un training je poserais des questions moins betes, promis!!!

[roulia_rousset]

derniere question, promis, mes trois premieres lignes sont des lignes de titre et ne contiennent pas d'info, ta solution est avantageuse car au moins les infos commencent a la ligne 0 qd je dois aller les chercher...dc est-ce qu'on peut les regrouper comme tu as fait?

[Jedai]

derniere question, promis, mes trois premieres lignes sont des lignes de titre et ne contiennent pas d'info, ta solution est avantageuse car au moins les infos commencent a la ligne 0 qd je dois aller les chercher...dc est-ce qu'on peut les regrouper comme tu as fait?

Tu peux te contenter de lire trois lignes avant de commencer à remplir @data.

--
Jedaï

[roulia_rousset]

Merci beaucoup Jedai!!!