Commit | Line | Data |
8273e845 |
1 | package # hide from PAUSE |
7653fdac |
2 | DBICTest::Schema::PunctuatedColumnName; |
3 | |
4a233f30 |
4 | use warnings; |
5 | use strict; |
6 | |
7653fdac |
7 | use base qw/DBICTest::BaseResult/; |
8 | |
9 | __PACKAGE__->table('punctuated_column_name'); |
10 | __PACKAGE__->add_columns( |
11 | 'id' => { |
12 | data_type => 'integer', |
13 | is_auto_increment => 1, |
14 | }, |
15 | q{foo ' bar} => { |
16 | data_type => 'integer', |
17 | is_nullable => 1, |
18 | accessor => 'foo_bar', |
19 | }, |
20 | q{bar/baz} => { |
21 | data_type => 'integer', |
22 | is_nullable => 1, |
23 | accessor => 'bar_baz', |
24 | }, |
25 | q{baz;quux} => { |
26 | data_type => 'integer', |
27 | is_nullable => 1, |
28 | accessor => 'bar_quux', |
29 | }, |
30 | ); |
31 | |
32 | __PACKAGE__->set_primary_key('id'); |
33 | |
34 | 1; |