local-lib5/lib/perl5/Template/Plugin/encoding.pm

   1 package Template::Plugin::encoding;
   2 use base qw( Template::Plugin );
   3
   4 our $VERSION = '0.02';
   5
   6 sub new {
   7     my $class = shift;
   8     my $contetx = shift;
   9     $_[0];
  10 }
  11
  12 1;
  13
  14 __END__
  15
  16 =head1 NAME
  17
  18 Tempate::Plugin::encoding - Template plugin to specify encoding
  19
  20 =head1 SYNOPSIS
  21
  22   [% USE encoding 'euc-jp' -%]
  23   <?xml version="1.0" encoding="[% encoding %]"?>
  24
  25 =head1 DESCRIPTION
  26
  27 Template::Plugin::encoding is a Template plugin to declare the
  28 encoding of template files. This plugin doesn't actually do anything
  29 but Template::Provider::Encoding scans the usage of this module to
  30 find the encoding of templates. As a bonus, you can use C<encoding>
  31 variable in the template to specify file encoding, which might be
  32 useful for XML or HTML meta tag.
  33
  34 =head1 AUTHOR
  35
  36 Tatsuhiko Miyagawa E<lt>miyagawa@bulknews.netE<gt>
  37
  38 This library is free software; you can redistribute it and/or modify
  39 it under the same terms as Perl itself.
  40
  41 =head1 SEE ALSO
  42
  43 L<Template::Provider::Encoding>
  44
  45 =cut