]>
iEval git - plack-app-gruntmaster.git/blob - Gruntmaster/Page/Learn.pm
1 package Gruntmaster
::Page
::Learn
;
6 use parent qw
/Exporter/;
7 our @EXPORT_OK = qw
/generate/;
8 our $VERSION = '0.001';
10 use constant FORMATS
=> [qw
/CPP/];
11 use constant TITLE
=> 'Learn Perl';
14 use HTML
::Template
::Compiled
;
16 use YAML
::Any qw
/LoadFile/;
17 use Gruntmaster
::Page
::Common qw
/header footer/;
21 Download interactive-perl-tutorial for <a href="ipt-linux">Linux</a> | <a href="ipt-windows.exe">Windows</a> | <a href="ipt-mac">Mac OS X</a>.
22 <p>Get the source from <a href="http://example.org/">meta::cpan</a>
26 $templates{$_} = header
($_, TITLE
) . $templates{$_} for keys %templates;
27 $templates{$_} .= footer
$_ for keys %templates;
30 my $template = $templates{$_[1]};
31 my $htc = HTML
::Template
::Compiled
->new(scalarref
=> \
$template);
This page took 0.041937 seconds and 4 git commands to generate.