The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;

use Test::More;
use Otogiri;
use Otogiri::Plugin;
use lib qw(./t/lib);

my $dbfile  = ':memory:';
my $db = Otogiri->new( connect_info => ["dbi:SQLite:dbname=$dbfile", '', ''] );

Otogiri->load_plugin('TestPlugin');
ok( $db->can('test_method') );
is( $db->test_method('a', 'b', 'c'), 'this is test_method a:b:c' );

done_testing;