/lib/Teto/Tatsumaki/Handler/Index.pm

http://github.com/motemen/Teto · Perl · 12 lines · 10 code · 2 blank · 0 comment · 0 complexity · 09dd3dca597aa812337401527dc8cc68 MD5 · raw file

  1. package Teto::Tatsumaki::Handler::Index;
  2. use strict;
  3. use warnings;
  4. use parent 'Teto::Tatsumaki::Handler';
  5. sub get {
  6. my $self = shift;
  7. my $control = $self->build_control;
  8. $self->render('index.html', { control => $control });
  9. }
  10. 1;