package Connector;

use DBIx::Connector;
use Types::Standard qw(InstanceOf);
use Moo::Role;

has 'connector' => (
    is      => 'ro',
    builder => '_build_connector',
    handles => [qw(dbh txn)],
    isa     => InstanceOf( ['DBIx::Connector'] ),
);

sub _build_connector {
    my $dsn  = qq(dbi:SQLite:dbname=db/myDB.sqlite);
    my $conn = DBIx::Connector->new(
        $dsn,
        {
            RaiseError => 1,
            AutoCommit => 1,
        }
    );
    $conn->mode('fixup');
    $conn;
}

1;

__END__