Select Code to Download

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

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

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