|
|
|
|
Alors sasuke on ne sais pas ? Fais moi le malin hein quand ta pas ton chacras...
bon, plus sérieusement essaye un truc dans le style (moi aussi je débute en Perl alors c'est possible que ce soit pas tout à fait ca !) :
sub lecture {
open IN, $_[0] or die "Impossible d'ouvrir le fichier $_[0] pour la cause suivante : $!\n";
my $infos_fichier = "";
while( $infos_fichier .= <IN> ) {
;
}
close IN;
return $infos_fichier;
}
Cette fonction s'appelle de la sorte : calcule("nomdufichier_avec_chemin"); Et puis apres tu fais une méthode qui ouvre une connexion à une base de donnée, tu crée ta requete et l'éxécute sur cette connexion, puis tu ferme la connexion. Si tu ne sais pas faire les connexion, dit le et je pourrais t'aiguiller. ++ ~ iclic @ gauch,iclic, iclic @ droate, iclic, iclic et ya pas de bôg môsieu ! ~
|
slt KIJ_82,
tu es sur que ton truc fonctionne (ça ne m'en a pas l'air) L'erreur est humaine mais un véritable désastre ne peut être qu'informatique. |
|
Bonjour,
Remarque: #!C:\Perl\lib\perl.exe Inutile sous MS-WINDOWS Pour charger un fichier:
#!/usr/bin/perl -w
use strict;
# --- Retourne le contenu du fichier dont le chemin est passé en paramètre
sub lecture {
my @contenu = ();
open(FILE, "$_[0]") || die "Erreur E/S: $!\n";
@contenu = <FILE>;
close(FILE);
return @contenu;
}
Pour utiliser les formats d'excel: http://search.cpan.org/~kwitknr/DBD-Excel-0.06/Excel.pm @+ -- O espirito da liberdade --
|
merci bcp pour vos reponse cela dis j ai encore un petit truc preciser c est que je suis en linux et non en windows... |
bonjour,
je suis en linux et non en windows... C'est mieux pour le perl. -> la première ligne du script: #!/usr/bin/perl -w Ensuite pour rendre le script exécutable: chmod +x mon_script.pl Pour exécuter le script: ./mon_script.pl Bon amusement avec perl et linux. Cordialement, @+ -- O espirito da liberdade -- |
dites moi, un de vous arriverai a me corriger car je vois vraiment pas l erreur que j ai faite...
#!/usr/bin/perl sub lecture { open (IN, "essai.xls") or die "Impossible d'ouvrir le fichier /home/hassler/Desktop/essai.xls pour la cause suivante : $!\n"; my $infos_fichier = ""; while( $infos_fichier .= <IN> ) { ; } close IN; return $infos_fichier; } sub ecriture { my $infos_fichier = $_[0]; open (OUT,">ecriturexls.txt"); print OUT $infos_fichier; close(OUT); } $infos_fichier = &lecture; &ecriture($infos_fichier); |
Bonjour,
#!/usr/bin/perl -w
use strict;
sub lecture {
my $fichier_in = "./essai.xls";
open (IN, "$fichier_in") || die "Impossible d'ouvrir le fichier essai.xls pour la cause suivante : $!\n";
my @infos_fichier = <IN>;
close IN;
return @infos_fichier;
}
sub ecriture {
my $fichier_out = "./ecriturexls.txt";
open (OUT,">$fichier_out");
foreach my $valeur (@_) {
print OUT $valeur;
}
close(OUT);
}
my @infos_fichier = &lecture;
&ecriture(@infos_fichier);
C'est ok commec ça? @+ -- O espirito da liberdade -- |
merci bcp philtrain, cela fonctionne !
cela dit encore une petite question...dans je lance le script et qu il ecrit dans le fichier : ecriturexls.txt, il se trouve qu il y a ca "ÐÏࡱ" a la place des valeur de mes cellules...pkoi ? est ce le contenu de mon fichier essaixls.pl qui est cripter ou pas ? |
C'est du au format .xls.
Pour le travailler, il faut utiliser le bon module --> voir sur cpan @+ -- O espirito da liberdade -- |
alors je me suis renseigné et j ai un peu chercher dans le cpan et mais trouvé à aucun endroit ou il parlait du fichier xls....
|
Bonjour,
C'est ici: http://search.cpan.org/dist/Spreadsheet-WriteExcel/ @+ -- O espirito da liberdade -- |
je ne peux pas ouvrir 2 fichiers indiqués XLS je n'ai pas excel .
est-ce que ça a un rapport ? MERCI |
comment lire le fichier xls?
et merci bcp |
bonjour, je travaille avec vista et office 2007, problème: j'ouvre un fichier excel, l'enregistre, il apparait dans document,
si je veux l'ouvrir, windows me répond qu'il ne trouve pas le document xlsx, que faire?? merci d'avance |
Résultats pour [PERL] lire contenu fichier .xls
Résultats pour [PERL] lire contenu fichier .xls
Résultats pour [PERL] lire contenu fichier .xls
Résultats pour [PERL] lire contenu fichier .xls
Résultats pour [PERL] lire contenu fichier .xls