如何在perl程序中使用任意外部程序作為過濾器？

Question

我想使用當前C版的Fletcher Penny的Multi-markdown作為Template Toolkit中的過濾器。 我不清楚如何設置它。

目前我不是將TT稱為模塊，而是簡單地編寫使用tpage和ttree調用的模板。

Answer 1

Template-Toolkit過濾器實際上很容易編寫。

模塊：

package Template::Plugin::Filter::MultiMarkdown;

use strict;
use warnings;

our @ISA = 'Template::Plugin::Filter';

sub init {
    my $self = shift;
    $self->install_filter('markdown');
    return $self;
}

sub filter {
    my ($self, $text) = @_;
    ... Code that transforms $text and returns the transformed text ...
}

1;

用法：

[% USE Filter.MultiMarkdown %]

[% FILTER markdown %]...[% END %]
  -or-
[% ... | markdown %]