perl – 如何处理Template Toolkit中的模板依赖项？

这是我在Mac上的TT网站项目中经常使用的ttree.cfg文件：

# directories
src = ./src
lib = ./lib
lib = ./content
dest = ./html

# pre process these site file
pre_process = site.tt

# copy these files
copy = \.(png|gif|jpg)$

# ignore following
ignore = \b(CVS|RCS)\b
ignore = ^#
ignore = ^\.DS_Store$
ignore = ^._

# other options
verbose
recurse

只运行ttree -f ttree.cfg将在dest中重建站点,只更新在源(在src中)或在我的库(在lib中)中更改的内容.

对于更精细的依赖项,请查看Template Dependencies.

更新 – 这是我通过子类化Template::Provider来获取依赖列表：

{
    package MyProvider;
    use base 'Template::Provider';

    # see _dump_cache in Template::Provider
    sub _dump_deps {
        my $self = shift;

        if (my $node = $self->{ HEAD }) {
            while ($nodE) {
                my ($prev,$name,$data,$load,$next) = @$node;

                say {*STDERR} "$name called from " . $data->{Caller}
                    if exists $data->{Caller};

                $node = $node->[ 4 ];
            }
        }
    }
}


use Template;

my $provider = MyProvider->new;

my $tt = Template->new({
    LOAD_TEMPLATES => $provider,});

$tt->process( 'root.tt',{} ) or die $tt->error;

$provider->_dump_deps;

上面的代码显示了所有被调用的依赖项(通过INCLUDE,INSERT,PROCESS和WRAPPER)以及从整个root.tt树中调用的位置.因此,您可以构建一个ttree依赖文件.

/ I3az /