use Data::Dumper;
use Cwd;
-use HTML::Template;
use Template;
use SL::Template;
use CGI::Ajax;
return $file;
}
-sub parse_html_template {
- $main::lxdebug->enter_sub();
-
- my ($self, $file, $additional_params) = @_;
-
- $additional_params ||= { };
-
- $file = $self->_prepare_html_template($file, $additional_params);
-
- my $template = HTML::Template->new("filename" => $file,
- "die_on_bad_params" => 0,
- "strict" => 0,
- "case_sensitive" => 1,
- "loop_context_vars" => 1,
- "global_vars" => 1);
-
- foreach my $key ($template->param()) {
- my $param = $additional_params->{$key} || $self->{$key};
- $param = [] if (($template->query("name" => $key) eq "LOOP") && (ref($param) ne "ARRAY"));
- $template->param($key => $param);
- }
-
- my $output = $template->output();
-
- $output = $main::locale->{iconv}->convert($output) if ($main::locale);
-
- $main::lxdebug->leave_sub();
-
- return $output;
-}
-
sub parse_html_template2 {
$main::lxdebug->enter_sub();
{ "name" => "CGI::Ajax", "url" => "http://search.cpan.org/~bct/" },
{ "name" => "DBI", "url" => "http://search.cpan.org/~timb/" },
{ "name" => "DBD::Pg", "url" => "http://search.cpan.org/~dbdpg/" },
- { "name" => "HTML::Template", "url" => "http://search.cpan.org/~samtregar/" },
{ "name" => "Archive::Zip", "url" => "http://search.cpan.org/~adamk/" },
{ "name" => "Text::Iconv", "url" => "http://search.cpan.org/~mpiotr/" },
{ "name" => "Time::HiRes", "url" => "http://search.cpan.org/~jhi/" },
* DBI
* DBD::Pg
-* HTML::Template
* CGI::Ajax
* Class::Accessor
* Archive::Zip
Für Debian beötigen Sie diese Pakete:
apache, postgresql, libdbi-perl, libdbd-pg-perl, libpgperl,
- libhtml-template-perl, libclass-accessor-perl, libarchive-zip-perl,
+ libclass-accessor-perl, libarchive-zip-perl,
libtext-iconv-perl, libyaml-perl, libtext-csv-perl,
libio-stringy-perl, libtemplate-perl
apache2, postgresql-server, perl-DBI, perl-DBD-Pg, perl-Archive-Zip,
perl-Class-Accessor, perl-Text-Iconv, perl-Text-CSV_XS,
- perl-HTML-Template, perl-IO-stringy, perl-Template-Toolkit
+ perl-IO-stringy, perl-Template-Toolkit
Da Perl-CGI-Ajax nicht als Paket für Distributionen bereit steht, muß