Aetius
22-11-2003, 11:38
Hallo Zusammen,
ich habe folgendes Problem:
Ich habe mir ein Perl-Script geschrieben, welches meine anfrage bearbeitet und die Antwort zurückgibt.
Aber ich möchte die include-Dateien von php nutzen. Wie kann ich in Perl sagen das er die PHP-Dateien ausführt?
Ein kurzer ausschnitt aus dem Script
...
sub ergebnis
{
@keysliste = keys %liste;
$anz = $#keysliste+1;
print "<?php\n";
print "include_once (\"inc/html_kopf.inc.php\")\;\n";
print "include_once (\"inc/menuebar.inc.php\")\;\n";
print "?>\n";
print "<br>\n";
print "Es wurden $anz Dokumente fuer den Suchbegriff '${suchbegriff}' gefunden.\n";
print "<br><br>\n";
print "<table>\n";
print "<tr>\n";
print "<td>Anzahl:</td>\n";
print "<td>Dokument:</td>\n";
print "</tr>\n";
foreach $schluessel (keys %liste)
{
print '<tr><td>', $liste{$schluessel}, '</td><td><a href="', $schluessel, '"target ="new">', $schluessel, '</a></td></tr>', "\n";
}
print "</table>\n";
print "<?php\n";
print "include_once (\"inc/html_fuss.inc.php\")\;\n";
print "?>\n";
}
#die main-funktion
einlesen();
...
Das funkt so nicht.
Danke
ich habe folgendes Problem:
Ich habe mir ein Perl-Script geschrieben, welches meine anfrage bearbeitet und die Antwort zurückgibt.
Aber ich möchte die include-Dateien von php nutzen. Wie kann ich in Perl sagen das er die PHP-Dateien ausführt?
Ein kurzer ausschnitt aus dem Script
...
sub ergebnis
{
@keysliste = keys %liste;
$anz = $#keysliste+1;
print "<?php\n";
print "include_once (\"inc/html_kopf.inc.php\")\;\n";
print "include_once (\"inc/menuebar.inc.php\")\;\n";
print "?>\n";
print "<br>\n";
print "Es wurden $anz Dokumente fuer den Suchbegriff '${suchbegriff}' gefunden.\n";
print "<br><br>\n";
print "<table>\n";
print "<tr>\n";
print "<td>Anzahl:</td>\n";
print "<td>Dokument:</td>\n";
print "</tr>\n";
foreach $schluessel (keys %liste)
{
print '<tr><td>', $liste{$schluessel}, '</td><td><a href="', $schluessel, '"target ="new">', $schluessel, '</a></td></tr>', "\n";
}
print "</table>\n";
print "<?php\n";
print "include_once (\"inc/html_fuss.inc.php\")\;\n";
print "?>\n";
}
#die main-funktion
einlesen();
...
Das funkt so nicht.
Danke