Thread Dynamisches Formular (5 answers)
Opened by MisterL at 2007-01-02 14:07

MisterL
 2007-01-02 14:07
#9444 #9444
User since
2006-07-05
334 Artikel
BenutzerIn
[default_avatar]
Hallo.

Ich versuche gerade die Quellcodes dieses Buchs
durchzuarbeiten. Bei dem Code zu Kapitel 8.5.2 (dynamische Formulare) klemmt es (Windows mit ActivePerl 5.8.8 & Linux mit Perlversion 5.8.1, Modul 'Template' immer in der neusten Version): Can't locate object method "substitute" via package "Template" at dynForm.pl line 58.
Hier erstmal der relevante Quellcode:
Code: (dl )
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
#!/usr/bin/perl -w
#Datei dynForm.pl
use strict;

BEGIN {
print( "Content-Type: text/html\n\n" );
}

use CGI qw( :cgi );
#use Template();
use Template;

my $templPath = "dynForm.html";
#Template-Instanz erzeugen
our $templ = new Template(
$templPath,
# { "templDir" => "C:\Programme\sambar\sambar64\cgi-bin",}
{ "templDir" => "/usr/bin",}
);
(..) Zeile 59
print( $templ->substitute( \%subs) );
$templ->nextPart();
foreach my $hobby ( getHobbies() ) {
print( $templ->substitute(
{ "val" => $hobby,
"lbl" => $hobby, }
));
(..)

Einfach den Quellcode auskommentieren führt nicht zum Ziel. Und das Template Modul downgraden verlief leider mit demselben Ergebnis...

Was könnte man noch tun ?
Ausser den Quellcode umzuschreiben oder es mit einer niederen Perlversion zu versuchen...

Danke im Voraus
mfg MisterL
“Perl is the only language that looks the same before and after RSA encryption.”

View full thread Dynamisches Formular