create table person
(
name varchar(15),
attr1 varchar(15),
attr2 varchar(1),
attr3 char(1),
attr4 int
)
如何通过获取像上面这样的简单表并将其映射到 Perl 对象来在 Perl 中使用基本 ORM?接下来,我想执行基本操作,例如使用一些类似于 Perl 的标准系统语法来选择结果。例如。:
@myResults = findAll(attr1 == 3 && attr2 =~ /abc/);
规则#1,不要自己编写。
CPAN 上有相当多的 ORM,包括...
-
DBIx::类 http://search.cpan.org/dist/DBIx-Class- 目前可能受欢迎程度排名第一
- 玫瑰::数据库::对象 http://search.cpan.org/dist/Rose-DB-Object
-
Fey::ORM http://search.cpan.org/dist/Fey-ORM- 我自己的贡献,最值得注意的是Moose http://moose.perl.org/-based,这意味着您可以在基于 ORM 的类中获得 Moose 的所有功能。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)