Using AnyEvent::DBI::MySQL with Mojolicious.

gistfile1.pl

use AnyEvent::DBI::MySQL;

sub startup {
    my $app = shift;

    $app->config(db => {dsn=>…, login=>…, pass=>…});

    $app->helper(dbh            => sub { shift->{dbh} });
    $app->helper(new_dbh        => sub {
        state $db = shift->app->config('db') or return;
        return AnyEvent::DBI::MySQL->connect(@{$db}{qw(dsn login pass)},
            {mysql_enable_utf8 => 1});
    });

    $app->hook(before_routes => sub {
        my $c = shift;
        # each connection have own dbh
        $c->{dbh} = $c->new_dbh;
    });
  
    …
}