Commit | Line | Data |
---|---|---|
ea2e61bf | 1 | package OtherFilm; |
2 | ||
3 | use strict; | |
4 | use base 'Film'; | |
5 | ||
6 | __PACKAGE__->set_table('Different_Film'); | |
7 | ||
8 | sub create_sql { | |
9 | return qq{ | |
10 | title VARCHAR(255), | |
11 | director VARCHAR(80), | |
12 | codirector VARCHAR(80), | |
13 | rating CHAR(5), | |
14 | numexplodingsheep INTEGER, | |
15 | hasvomit CHAR(1) | |
16 | }; | |
17 | } | |
18 | ||
19 | 1; | |
20 |