Leser: 1
6 Einträge, 1 Seite |
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, }
));
(..)
Quotedas einzig schlimme daran ist der modulname, denn den gibt es eben
schon auf CPAN, aber was soll daran schlecht sein, ein modul
Blubber.pm im aktuellen verzeichnis zu benutzen?
6 Einträge, 1 Seite |