##
package Test::Model::Test;
use Dancer::Plugin::Database;
use Dancer::Logger;
use constant ROLE_ADMIN => 1;
##Edits a new website
sub edit_website($$) {
my ($user, $website) = @_;
database->quick_update('test_website', {id => $website->{id}},
{ name => $website->{name},
url => $website->{url},
});
database->commit();
}
##Return sthe website object .
sub get_website($) {
my ($id) = @_;
my $website = database->quick_select('test_website', { id => $id });
return $website;
}
true;
##
##
##
##
Login
<% IF err %>
Incorrect username / password
<% END %>
##
##
create table if not exists `testdb`.test_website (
id integer primary key auto_increment,
name varchar(255) not null,
url varchar(255) not null
) ENGINE=INNODB DEFAULT CHARSET=utf8;
INSERT INTO `testdb`.test_website(name, url) values ('test1', 'mytest.com');