The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
-- lifted from DBIx::Class' t/lib/sqlite.sql

CREATE TABLE artist (
  artistid INTEGER PRIMARY KEY NOT NULL,
  personid INTEGER NOT NULL,
  name varchar(100)
);

CREATE TABLE cd (
  cdid INTEGER PRIMARY KEY NOT NULL,
  artistid integer NOT NULL,
  title varchar(100) NOT NULL,
  year varchar(100) NOT NULL
);

CREATE TABLE track (
  trackid INTEGER PRIMARY KEY NOT NULL,
  cdid integer NOT NULL,
  position integer NOT NULL,
  title varchar(100) NOT NULL,
  last_updated_on datetime NULL
);

CREATE TABLE shop (
  shopid INTEGER PRIMARY KEY NOT NULL,
  employee_count INTEGER NOT NULL DEFAULT 1,
  name VARCHAR(100) NOT NULL
);

CREATE TABLE cd_shop (
  cdid INTEGER NOT NULL,
  shopid INTEGER NOT NULL,
  PRIMARY KEY ( cdid, shopid )
);

-- this is just to test proxying in DBIC
CREATE TABLE audiophile (
  personid INTEGER PRIMARY KEY NOT NULL,
  shopid INTEGER
);

CREATE TABLE cdshop_audiophile (
  cdid INTEGER NOT NULL,
  shopid INTEGER NOT NULL,
  personid INTEGER NOT NULL,
  PRIMARY KEY ( cdid, shopid, personid )
);

CREATE TABLE person (
  personid INTEGER PRIMARY KEY NOT NULL,
  first_name VARCHAR(100)
);