$ dbicdump -o dump_directory=./lib -o components='[q{InflateColumn::DateTime}]' -o preserve_case=1 MyClass::MyDB::Schema dbi:mysql:MyDB:localhost:3306 -o overwrite_modifications=1 db_user db_password

##</code><code>##

get '/user/:name' => sub {
    database->quick_select('users', { name => params->{name} });
};

##</code><code>##

# Database with tables related by foreign key
# route handler subclassed from somewhere or consuming a DB role
# pseudocode
get '/user/:name/hobby' => sub {
    my $user = $self->db_rs('MyDB', 'Users')->find({ name => params->{name} });
    return $user->hobby;
};