The Perl and Raku Conference 2025: Greenville, South Carolina - June 27-29 Learn more
123456789101112131415 package OtherThing;use warnings;use strict;use base 'DBIC::Test::SQLite';OtherThing->set_table("other_thing");OtherThing->columns(All => qw(id));sub create_sql { return qq{ id INTEGER };}
package
OtherThing;
use
warnings;
strict;
base
'DBIC::Test::SQLite'
;
OtherThing->set_table(
"other_thing"
);
OtherThing->columns(
All
=>
qw(id)
sub
create_sql {
return
qq{
id INTEGER
}