Discussion :

[atv_picco]

bonjour j'ai un soucis qui me laisse perplexe !

je souhte realiser un formulaire html qui recupere des donnees dans un fichier excel pour obtenir les valeurs des differents champs de mon formlaire puis une fois formulaire, on ecrit les resultats dans une base de donnees et l'on genere un fichier ex en fonction des choix saisis dans le formulaire.

j'arrive a recuperer des donnees dans un fichier excel et a ecrire dedans. J'ai creer un serveur local avec Apache.

je suis sous linux avec une distrbution Kubuntu Dapper, et je travaille avec Kate.

J'ai creer un formulaire html puis je l'ai deposer sur le serveur. => OK ca fonctionne !
mais des que j'insere cette ligne dans mon script : use Spreadsheet::ParseExcel;


j'obtiens la reponse suivante : Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator, you@your.address and inform them of the time the error occurred, and anything you might have done that may have caused the error.

More information about this error may be available in the server error log.
Apache/2.0.53 (Unix) mod_ssl/2.0.53 OpenSSL/0.9.7d PHP/5.0.3 DAV/2 mod_perl/1.999.21 Perl/v5.8.6 Server at localhost Port 80

De plus, j'ai apercu un post similaire mais pour windows ou il parlait de WIN32::OLE, OLE??? Qu'est-ce que c'est? a quoi ca sert ?

Merci d'avance


ps : Pour info 'utilise la methode GET dans mon formulaire !

[djibril]

ta page signifie juste que tu as des erreurs dans ton code perl cgi. Il faut que tu ailles voir ton fichiers logs pour y voir les messages d'erreur perl

[atv_picco]

Merci Djibril.

J'ai donc un soucis avec OLE/Storage_Lite.pm
Il me suffit donc ajouter la librairie si je comprends bien.
Mais elle fait quoi exactement, j'ai fait unour sur le site CPAN, mais ca reste flou

[djibril]

quels sont les messages d'erreurs de tes logs, sans ça personne ne peut t'aider

[lanfeust42]

Bon sans voir le code ca peut rester flou mais je dirais que tu mélange les méthode tu doit faire une partit de ton code avec OLE et l'autre avec spreadsheet, ca marche pas super généralement

[atv_picco]

OK merci !
J'ai resolu mon pb. Il me fallait installer OLE_storage_lite
voila quand meme le contenu de mon error_log :

[Mon Jul 17 08:06:24 2006] [error] [client 127.0.0.1] File does not exist: /opt/lampp/htdocs/favicon.ico
[Mon Jul 17 08:48:29 2006] [error] [client 127.0.0.1] Can't locate OLE/Storage_Lite.pm in @INC (@INC contains: /opt/lampp/lib/perl5/5.8.6/i686
-linux /opt/lampp/lib/perl5/5.8.6 /opt/lampp/lib/perl5/site_perl/5.8.6/i686-linux /opt/lampp/lib/perl5/site_perl/5.8.6 /opt/lampp/lib/perl5/si
te_perl .) at /opt/lampp/lib/perl5/site_perl/5.8.6/Spreadsheet/ParseExcel.pm line 176.
[Mon Jul 17 08:48:29 2006] [error] [client 127.0.0.1] BEGIN failed--compilation aborted at /opt/lampp/lib/perl5/site_perl/5.8.6/Spreadsheet/Pa
rseExcel.pm line 176.
[Mon Jul 17 08:48:29 2006] [error] [client 127.0.0.1] Compilation failed in require at /opt/lampp/htdocs/xampp/devis.pl line 11.
[Mon Jul 17 08:48:29 2006] [error] [client 127.0.0.1] BEGIN failed--compilation aborted at /opt/lampp/htdocs/xampp/devis.pl line 11.
[Mon Jul 17 08:48:29 2006] [error] [client 127.0.0.1] Premature end of script headers: devis.pl

Maintenant j'arrive a ouvrir mon fichier excel et je recupere correctement mes donnees, cependant, je voudrais apres validation de mon formulaire creer un autre fichier excel et la j'ai encore un hic !!!


error_log : [Tue Jul 18 10:50:54 2006] [error] [client 127.0.0.1] [Tue Jul 18 10:50:54 2006] devis.pl: Can't open perl.xls. It may be in use or protected at /opt/lampp/htdocs/xampp/devis.pl line 77, referer: http://localhost/xampp/devis.pl
[Tue Jul 18 10:50:54 2006] [error] [client 127.0.0.1] [Tue Jul 18 10:50:54 2006] devis.pl: Can't call method "AddWorksheet" on an undefined value at /opt/lampp/htdocs/xampp/devis.pl line 177., referer: http://localhost/xampp/devis.pl


Script Perl :

use Spreadsheet::ParseExcel;
use Spreadsheet::ParseExcel::SaveParser;
use Spreadsheet::WriteExcel;

line 77 my $workbook = Spreadsheet::WriteExcel->new('test_write_excel.xls');

line 177 my $SumUp = $workbook->AddWorksheet();
line 178 my $SheetAlim = $workbook->AddWorksheet();

Avec $SumUp et $SheetAlim les variables representants mes feuilles excel a moins que je me trompe, je n'en suis pas sur a 100% car je debute en perl