File Coverage

blib/lib/WE_Frontend/Plugin/NullFilter.pm

Criterion	Covered	Total	%
statement	9	11	81.8
branch			n/a
condition			n/a
subroutine	3	4	75.0
pod	0	1	0.0
total	12	16	75.0

# -*- perl -*-

#
# $Id: NullFilter.pm,v 1.1 2004/03/25 13:52:43 eserte Exp $
# Author: Slaven Rezic
#
# Copyright (C) 2004 Slaven Rezic.
# This is free software; you can redistribute it and/or modify it under the
# terms of the GNU General Public License, see the file COPYING.

#
# Mail: [e-mail]
# WWW:  http://we-framework.sourceforge.net
#

package WE_Frontend::Plugin::NullFilter; # <-- change this
use base qw(Template::Plugin::Filter);

use strict;
use vars qw($VERSION);
$VERSION = sprintf("%d.%02d", q$Revision: 1.1 $ =~ /(\d+)\.(\d+)/);

=head1 NAME

WE_Frontend::Plugin::NullFilter - a sample custom filter

=head1 SYNOPSIS

    # In the calling script (normally already done by WebEditor::OldController)
    my $t = Template->new({PLUGIN_BASE => "WE_Frontend::Plugin"});

    # In the template
    [% USE NullFilter %]
    [% FILTER $NullFilter %]
    ...
    [% END %]
    [% variable | $NullFilter %]

=head1 DESCRIPTION

This filter does nothing, i.e. it copies the input unchanged to the
output. This module serves as a sample filter for own extensions.

=cut

sub filter {
    my($self, $text) = @_;
    # do something interesting with $text
    return $text;
}

1;

__END__