Javascript dans une page PERL

Version imprimable

11/06/2008, 14h12
High Voltage

Javascript dans une page PERL

Bonjour,

Est-il possible d'inclure un script javascript dans une page PERL ? Et si oui comment ?
En faisant

Citation:

print("<script type="text/javascript">...");

simplement ?

Merci d'avance !

Code:

1
2
3
print $query->start_html(-title=>'titre',               
			    	-script=>{-language => "JAVASCRIPT",-src=>"/text/javascript.js"},
                          );

11/06/2008, 16h18
High Voltage

Ok merci. Mais à quoi correspont le "titre" ?
11/06/2008, 16h39
CKLN00

le simple print (que tu propose) fonctionne aussi.
la solution de djibril est si tu utilise le module CGI (du moins il me semble ^_^)
11/06/2008, 16h43
High Voltage

Oui c'est du CGI (j'ai oublié de le préciser) ;)
11/06/2008, 16h53
djibril

Citation:

Envoyé par High Voltage

Ok merci. Mais à quoi correspont le "titre" ?

A mettre un titre à la page ;)
12/06/2008, 08h45
High Voltage

Arf ça marche pas ! Grosse page blanche. :?:?:?
12/06/2008, 09h07
CKLN00

affiche le code source de la page et essaye de lire le log d'erreur du serveur si tu y as accès

ça peut aider :)
12/06/2008, 09h20
High Voltage

Dans le code source j'ai seulement "<head>" :D

Bon, j'ai du faire une erreur. voici le début de ma page :

Citation:

#!/bin/perl

use CGI qw(:standard);
$html = new CGI;
print $html->header;
print("<head>");

############################# Script permettant le menu déroulant dynamique ########################################
print $query->start_html(
-script=>{-language => "JAVASCRIPT",-src=>"script.js"},
);
################################################ Fin du script ####################################################

print("</head>");
print("<body>");

Qu'est-ce qui ne va pas ?

Toi, tu n'as pas lu le manuel du module CGI...
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 #!/bin/perl -T use strict; use warnings; use CGI qw(:standard); print header, start_html( -title => "Ma super page CGI de débutant", -script => {-language => "Javascript",-src=>"script.js"}), h1("Ca marche !"), p("Vous pouvez venir hacker mon site maintenant ! ;-)"), end_html(); __END__
(tu es sûr de l'emplacement de ton perl ? C'est plutôt /usr/bin/perl ou même /usr/local/bin/perl d'habitude)

--
Jedaï

12/06/2008, 10h23
High Voltage

Sûr ! (ça marche très bien sans le script) ;)

Je vais essayer ce que tu m'as dit (désolé non je n'ai pas lu la page...)