From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

JSWARTZ / Poet-0.16 / eg / blog / lib / Blog / DB.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13

              
package Blog::DB;
use Poet qw($env);
use strict;
use warnings;
use base qw(Rose::DB);
__PACKAGE__->use_private_registry;
__PACKAGE__->register_db(
    driver   => 'sqlite',
    database => $env->data_path("blog.db"),
);
1;