#!/usr/bin/perl use strict; use warnings; use Mojolicious::Lite; use FindBin; use lib $FindBin::Bin; plugin('I18N' => { namespace => 'Local::I18N', default => 'de' } ); plugin('TagHelpersI18N'); any '/' => sub { my $self = shift; $self->languages( $self->param('lang') || 'de' ); $self->render( 'default' ); }; any '/no' => sub { shift->render }; app->start; __DATA__ @@ default.html.ep %= select_field 'test' => [qw/hello test/]; @@ no.html.ep %= select_field 'test' => [qw/hello test/], no_translation => 1;