Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/env perl
- use strict;
- use warnings;
- use DDP;
- use Template;
- my $tt = Template->new({
- INCLUDE_PATH => './',
- });
- my $app = sub {
- my $out;
- $tt->process("index.html", {}, \$out);
- return [
- '200',
- [ 'Content-Type' => 'text/html' ],
- [ $out ],
- ];
- };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement