1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
package Lazy;
BEGIN { unshift @INC, './t/testlib'; }
use base 'Class::DBI::Test::SQLite';
use strict;
__PACKAGE__->set_table("Lazy");
__PACKAGE__->columns('Primary', qw(this));
__PACKAGE__->columns('Essential', qw(opop));
__PACKAGE__->columns('things', qw(this that));
__PACKAGE__->columns('horizon', qw(eep orp));
__PACKAGE__->columns('vertical', qw(oop opop));
sub create_sql {
return qq{
this INTEGER,
that INTEGER,
eep INTEGER,
orp INTEGER,
oop INTEGER,
opop INTEGER
};
}
1;
|
