Help for this page

Select Code to Download


  1. or download this
    package Recording::Provider;
use base qw(Template::Provider);
...
    my $self = shift;
    return( $self->SUPER::fetch($Template_name = shift) );
};
  2. or download this
    my @config = (
    INCLUDE_PATH    => '/Users/adrianh/Desktop/template/',
...
        Recording::Provider->new(@config, DEFAULT => 'default.t2'),
    ],
}) or die "could not make template\n";
  3. or download this
    [% PERL %] print Recording::Provider->last_template [% END %] 
failed to load