Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- package MyApp::Plugin::ListDatabase::List;
- sub new {
- my ($class, %attrs) = @_;
- bless \%attrs, $class;
- }
- sub update {
- my $self = shift;
- $self->db->resultset('List')->search(
- {
- items => 700
- }
- )->update(
- {
- items => 800
- }
- );
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement