Include PHP dans un script Perl
Salut,
J'ai un probleme, mon site utilise un fichier php qui gere le menu deroulant(avec css et js) j'ai donc toutes mes pages en php et je met un include du style :
Code:
<?php $chemin = '../../'; include($chemin.'menu.php'); ?>
cependant j'utilise des scripts CGI Perl qui me créé eux meme des pages aux format HTML et qui ont leur propres fonction JS au chargement dans la balise body.
Je souhaite donc afficher le menu sur ces pages créer mais je n'arrive pas a afficher celui ci.
mon fichier menu.php commence ainsi(a noter la fermeture de la balise head et le debut de body) :
Code:
1
2
3
4
5
6
| <link rel="stylesheet" type="text/css" href="<?php echo($chemin);?>menu.css">
<script language="javascript" type="text/javascript" src="<?php echo($chemin);?>menu.js"></script>
<title>Nec i-mode</title>
</head>
<link type="text/css" rel="stylesheet" href="<?php echo($chemin);?>page.css">
<body> |
j'ai donc modifier le menu.php pour mettre le "onload" du JS dans la balise body et juste invoqué l'include dans mon script perl mais ca ne fonctionne pas .
mon code perl avant tentative d'inclure le menu contient :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
| print "Content-type: text/html\n\n";
print <<"HTML";
<HTML>
<HEAD>
<script type=text/javascript>
function emulHover()
{
if(document.all)
{
TR = tab.getElementsByTagName('tr');
for(i in TR)
{
TR[i].className = 'ieTR';
TR[i].onmouseover = function()
{
this.className = 'ieTRhover';
}
TR[i].onmouseout = function()
{
this.className = 'ieTR';
}
}
}
}
</script>
</HEAD>
<link type="text/css" rel="stylesheet" href="../../../nemip/php/table.css">
<BODY onload="emulHover()">
<TABLE id="tab" bgcolor="#DCDCDC">
HTML |
mon fichier perl apres tentative:
Code:
1
2
3
4
5
6
7
| print "Content-type: text/html\n\n";
print <<"HTML";
<HTML>
<HEAD>
<?php $chemin = '../../../'; include($chemin.'menu.php'); ?>
<TABLE id="tab" bgcolor="#DCDCDC">
HTML |
le probleme que j'ai remarqué c'est le passage du parametre $chemin. en fait qu'en je test la page et que j'affiache la source j'obtient:
Code:
<?php = '../../../'; include(.'menu.php'); ?>
en fait la variable $chemin ne passe pas dans mon code perl :?
c'est un peu compliqué :aie: ! mais bon si qq'un m'a suivi... merci de m'aider ;)
