DBIx：Class - 找不到模型的来源

Question

我正在尝试使用DBIx：Class。我已经使用DBIx成功创建了Schema类：class :: Schema :: Loader。

我也可以连接到数据库。

#!/usr/bin/perl -w
use Test::More tests => 5;

use_ok('Models::ModelRole');
use_ok('Models::User');

my $model = Models::User->new();

cmp_ok($model->{ModelName}, 'eq', 'User', 'model name');

ok($model->connect(), "connect"); #works


ok($model->{schema}->resultset('User'));

最后一个测试返回错误消息：

DBIx::Class::Schema::source(): Can't find source for User at ./tests/ModelsTests.pl line 29

这是DBIx生成的类的结构：Class :: Schema :: Loader：

这是模型用户类：

package Models::User;

use DB::Glued::Schema::Result::User;
use Models::ModelRole;
use Moose;


with 'Models::ModelRole';


sub BUILD {
    my $self = shift;

    $self->{schema} = Glued::Schema::Result::User->new();
    my @name = split('::', __PACKAGE__);
    $self->{ModelName} = $name[-1];
}
1;

我希望这是足够的信息。

Answer 1

架构/模型必须连接到源。 DBIC代码仅描述数据及其关系。它完全不了解源/连接。

因此，您必须连接DB::Glued::Schema才能行使模型。我认为，测试的最佳方法是连接到:memory: SQLite DB。 DB当然是空的。如果你需要固定装置，有一些选项/方法可以填充它。如果你这样做，请搜索metacpan。

有一个很好的软件包可以让您轻松完成测试连接：Test::DBIx::Class。