Advertisement
gabrielvml

Untitled

Feb 1st, 2012
136
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.43 KB | None | 0 0
  1. use Mojolicious::Lite;
  2. use utf8;
  3. use Data::Dumper;
  4. get '/' => sub {
  5.     my $self = shift;
  6.     my $config = do "my_config.txt";
  7.     $self->render( config => Dumper $config );
  8. } => 'index';
  9.  
  10. app->start('daemon');
  11. __DATA__
  12.  
  13. @@ index.html.ep
  14. <html><head><meta content="text/html; charset=UTF-8" http-equiv="content-type"></head><body>
  15. %==stash 'config'
  16. </body></html>
  17.  
  18. ############# myconfig.txt
  19. {
  20.  name => 'testïng encóding',
  21. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement