我使用DBIx::Class::Schema::Loader创建了这样的架构:
#!/usr/bin/perl
use strict;
use warnings;
use DBIx::Class::Schema::Loader qw/make_schema_at/;
make_schema_at(
"Mydb::Schema",
{debug => 0, dump_directory => "../db/",
generate_pod => 0,},
["dbi:mysql:mydb:localhost:3306", 'mydb', 'password'],
);
我在MySQL中的表名是people
,但是当我运行此代码时,生成的类名为Mydb::Schema::Result::Person
:
$ cat Mydb/Schema/Result/Person.pm
use utf8;
package Mydb::Schema::Result::Person;
# Created by DBIx::Class::Schema::Loader
# DO NOT MODIFY THE FIRST PART OF THIS FILE
use strict;
use warnings;
use base 'DBIx::Class::Core';
__PACKAGE__->table("people");
__PACKAGE__->add_columns(
"pplid",
{
data_type => "smallint",
extra => { unsigned => 1 },
is_auto_increment => 1,
is_nullable => 0,
},
...
...
为什么"人和#34;被转换为"人"?
答案 0 :(得分:4)
默认情况下,DBIx :: Class :: Schema :: Loader将结果类的名称单一化。拥有一个人的数据库表是有意义的,但是让一个对象代表一个名为" People"。
的人是没有意义的。如果您确实需要,可以在make_schema_at
中设置naming
选项来更改此设置:
make_schema_at(
"Mydb::Schema",
{
debug => 0,
dump_directory => "../db/",
generate_pod => 0,
naming => { monikers => 'preserve' }
},
["dbi:mysql:mydb:localhost:3306", 'mydb', 'password'],
);
但我建议坚持使用默认值。