@H_403_1@在DBIx :: Class中查找类的表名很简单,就像这样
my $s = DBIx::Class::Schema::Loader->connect('dbi:sqlite:foo.db');
$s->class($class_name)->table;
解决方法
使用
$schema->sources获取架构中所有源名称的列表.然后你可以grep找到与你的表匹配的那个：
my ($class_name) = grep { $s->class($_)->table eq $table } $s->sources;