TorstenA: Aufrufen von Perlscript mittels SSI

Beitrag lesen

Hallo Elmar,

Wie sollte ich aber PERL-Scripte aufrufen ?

Zwei Möglichkeiten bei SSI:
1. <!--#include virtual="/cgi-bin/script.pl?var=wert"-->
2. <!--#exec cgi="/cgi-bin/script.pl"-->

Mit der ersten Variante kannst du dein Script mit Parametern ausführen lassen, bei der zweiten nicht.

Für die Ausgabe der Scripte müsste doch auch wieder ein
Template erstellt werden ?

Nicht unbedingt, du kannst aber mit HTML::Template arbeiten. Dann rufst du das Script direkt auf:
<a href="/cgi-bin/script.pl?var=wert">Perl-Script</a>

Deine Testseite speicherst du als seite.tmpl, die Ausgabe des Perl-Scripts sähe dann so aus:

sub print_document {
  my $template = HTML::Template->new( filename => '../seite.tmpl');
  $template->param( PARAM1 => $_[0],
                    PARAM2 => $_[1]   # usw. usf.
                  );
  print "Content-Type: text/html\n\n", $template->output;
}

<td>
Hier kommt der Code der ursprünglichen Seite hin.
Umwandlung in shtml.
</td></tr>

<td><TMPL_VAR NAME="PARAM1"></td>
<td><TMPL_VAR NAME="PARAM2"></td>

usw. usf.

Siehe: http://search.cpan.org/~samtregar/HTML-Template-2.6/Template.pm

Grüße
Torsten