• Perl WEB 开发之 Template


    由于工作需要, 最近开始使用Perl来作为服务器脚本来处理Web 请求。系统采用的Template 来做Web page 的模板,用来简化繁琐但并不困难的HTML标签的编写。

    Question 1: Template Toolkit 是啥?

    Template Toolkit是一组Perl Module的集合, 它实现了一种快速的、灵活的、功能强大模板处理系统(Template Process System). 它主要用于生成动态的WEB内容,当然,它也可以被用来处理任何其他的文本信息。简单来说, Template Toolkit首先提供了一种简单的方式,用来将模板中的变量替换成其对应的值, 类似于其他编程语言中的变量赋值,当然其二者间有很大的差别。

    例子:

    Dear [% name %],

    It has come to our attention that your account is in arrears to the sum of [% debt %].

    Please settle your account before [% deadline %] or we  will be forced to revoke your Licence to Thrill.

    The Management.


     

    默认情况下, 在Template源文件中, template directives被嵌入到由字符序列“[%...%]”标记的块中。当然,你可以自己配置这种标记序列,同时也可以更改其它方面的配置。比如, 你可以设置INTERPOLATE选项的值,以perl的方式来嵌入你的变量:

    Dear $name,

    It has come to our attention that your account is in

    arrears to the sum of $debt.

    ...etc...

    Template Module 是啥?

    刚刚初步了解了Template Toolkit的含义, 下面开始介绍Template Module。如果要对应到实际的物理文件,就是CPAN上的Template.pm。 概括来说, Template Module 提供了一个Template Toolkit的接口, 其他的Perl可以使用该接口集合来在perl 脚本里面方便的调用Template Toolkit的功能。

    简单的Template 接口:

    new(/%config):

    构造函数(由Template 的base class Template::Base 来实现)。其参数是一个用于存放该新建的Template配置的一个Hash结构。

     my $tt = Template->new({
    INCLUDE_PATH => '/usr/local/templates',
    EVAL_PERL => 1,
    }) || die $Template::ERROR, "/n";
    process($template, /%vars, $output, %options
    ): 该函数被调用用来处理一个Template。
    第一个参数为指向Template 文件的相对于INCLUDE_PATH的相对文件名, 也可以是包含了Template Text的字符串的引用,
    或者是一个File handle(IO::Handle 或 sub-class)或 GLOB(如:/*STDIN)。
    第二个参数是一个reference to Hash变量, 他包含了Template中需要的变量的定义。
    第三个参数支持process函数处理完成的结果被输出到哪里[默认可选]。 
    默认的情况, STDOUT是被使用。 也可通过这个参数和OUTPU_PATH共同来决定输出到什么位置,某个文件、字符串或File Handle
    第四个参数同样是一个可选参数, 用来进一步来设定process过程的输出选项。目前仅有一个选项可用 binmode来指定是否以2进制方式输出。
    # either: hash reference of options
    $tt->process($infile, $vars, $outfile, { binmode => 1 })
    || die $tt->error(), "/n";

    # or: list of name, value pairs
    $tt->process($infile, $vars, $outfile, binmode => 1)
    || die $tt->error(), "/n";
    error():
    当以Class Method被调用的时候, 返回Package variable $ERROR, 所以如下两种表达方式所得到的结果一致:
    my $tt = Template->new()
    || die Template->error(), "/n";

    my $tt = Template->new()
    || die $Template::ERROR, "/n";
    service(): 
    Template Module 用来处理模板的时候,会将大多数任务交与底层的Template::Service来处理,而该函数会返回Template::Service对象的引用。
    context(): Template::Service在运行时处理templates的时候,会依靠一个核心的Template::Context对象,这个方法返回指向这个对象的引用,它相当于调用
    $template->service->context();
  • 相关阅读:
    Mysql 优化 or
    为什么 Mysql 推荐使用整形自增的主键而不使用 UUID
    Mysql 索引上做计算为什么会导致索引失效
    SQL 提示
    索引语法
    Mysql 优化 limit 1
    Mysql 优化 like
    SpringCloud Feign 报错 Request method 'POST' not supported 的解决办法
    前缀索引
    Explain 关键字
  • 原文地址:https://www.cnblogs.com/yuboyue/p/2109870.html
Copyright © 2020-2023  润新知