package # hide from PAUSE DBICTest::Schema::PunctuatedColumnName; use warnings; use strict; use base qw/DBICTest::BaseResult/; __PACKAGE__->table('punctuated_column_name'); __PACKAGE__->add_columns( 'id' => { data_type => 'integer', is_auto_increment => 1, }, q{foo ' bar} => { data_type => 'integer', is_nullable => 1, accessor => 'foo_bar', }, q{bar/baz} => { data_type => 'integer', is_nullable => 1, accessor => 'bar_baz', }, q{baz;quux} => { data_type => 'integer', is_nullable => 1, accessor => 'bar_quux', }, ); __PACKAGE__->set_primary_key('id'); 1;