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

BEGIN { unshift @INC, './t/cdbi-t/testlib'; }

use strict;
use base 'Class::DBI::Test::SQLite';

__PACKAGE__->set_table('Blurbs');
__PACKAGE__->columns('Primary', 'Title');
__PACKAGE__->columns('Blurb',   qw/ blurb/);

sub create_sql {
	return qq{
			title                   VARCHAR(255) PRIMARY KEY,
			blurb                   VARCHAR(255) NOT NULL
  }
}

1;