Grafik-Button: Ausgabe einer Grafik auf Homepage - #8699 (Perl/CGI)

renee

2006-09-21 09:54

User since
2003-08-04
14371 Artikel
ModeratorIn

Dafür arbeitest Du am besten mit Templates. Dafür kannst Du CPAN:

HTML::Template::Compiled verwenden.

Template:

Code: (dl )

<html>
<body>
<img src="<!-- TMPL_VAR NAME=BILD -->"><br />
<a href="./bild.cgi?param1=<!-- TMPL_VAR NAME=PARAM -->"><img src="./images/pfeil1.jpg"></a>
<a href="./bild.cgi?param1=<!-- TMPL_VAR NAME=PARAM -->"><img src="./images/pfeil2.jpg"></a>
</body>
</html>

bild.cgi:

Code: (dl )

#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
use strict;
use warnings;
use CGI;
use HTML::Template::Compiled;

my $cgi = CGI->new();
my %params = $cgi->Vars();

print $cgi->header();
my $template_file = 'template.tmpl';

my $tmpl_obj = HTML::Template::Compiled->new(filename => $template_file);

# berechne Bild

$tmpl_obj->param(BILD => 'pfad/zu/neuem/Bild', PARAM => 'Wert für PARAM');
print $tmpl_obj->output();

Du musst natürlich noch einiges anpassen und ggf. CPAN:

HTML::Template::Compiled Wiki:

installieren

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/