perlboard @ sourceforge - #90813 (Perl-Community.de)

Strat

2006-07-19 23:09

User since
2003-08-04
5246 Artikel
ModeratorIn

mod_perl_startup.pl Zeile 47+

Code: (dl )

1
2

# preload templates
HTML::Template::Compiled->preload("$ENV{PERL5LIB}/htc_cache");

PBoard::Subs.pm zeile 87++:

Code: (dl )

    my $template;
    eval {
    $template = HTML::Template::Compiled->new
        ( filename    => "$path${templateFile}_template.html",
          path        => "$FindBin::Bin/templates",
          global_vars => 1, # to be able to use global vars in LOOPs
              tagstyle    => [qw(+asp -comment -classic)],
              cache_dir   => "$ENV{PERL5LIB}/htc_cache",
          %templateParams,
          );
    }; # eval

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

Antworten mit Zitat