c9s (owner)

Revisions

gist: 228617 Download_button fork
public
Public Clone URL: git://gist.github.com/228617.git
Embed All Files: show embed
td inside.pm #
raw 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

package Test;
use warnings;
use strict;
use Template::Declare::Tags;
 
sub new {
    my $class = shift;
    bless { } , $class ;  
}
 
sub widget_1 {
    my $self = shift;
    my $template = sub { 
        my $self = shift;
        h3 { " Test2 " }; 
    }; 
    Template::Declare->buffer->push( private => 1);
    $template->( $self ); 
    return Template::Declare->buffer->pop;
}
 
1;