Advertisement
Guest User

Callback not working

a guest
Mar 22nd, 2014
99
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.29 KB | None | 0 0
  1. sub startup {
  2.   my $self = shift;
  3.  
  4.   $self->setup_plugins;
  5.   $self->setup_helpers;
  6.   $self->setup_routes;
  7. }
  8.  
  9. sub setup_routes {
  10.   my $self = shift;
  11.  
  12.   my $r = $self->routes;
  13.  
  14.   $r->route('/bye')->to(cb => sub {
  15.     my $self = shift;
  16.     $self->render(text => 'Good bye.');
  17.   });
  18. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement