On Sat, Apr 17, 2010 at 12:48 PM, Paul Bennett <paul.w.benn...@gmail.com>wrote:
> I've been working on the following project for a while, mostly just to > scratch my own itch: > > http://code.google.com/p/perl-**dbix-nailgun/source/browse/<http://code.google.com/p/perl-dbix-nailgun/source/browse/> > > It's heavily inspired by Ruby on Rails' implementation of Active Record, > tweaked to be more Perlish. > > It's supposed to literally grok the database structure and DWIM. By > "literally grok", I mean _literally_ consume the database structure, and by > consuming it, come to a full understanding of it. By DWIM, I mean DW _I_ M, > but hopefully I'm sane enough that what I mean is what any sane person ought > to mean. > > The code snippet on the project front page says more than I think I could > say in English, at least more tersely: > > package MyApp::Photos; > use base qw(DBIx::Nailgun); > sub init { > my $self = shift; > $self > ->validates_presence_of('**filename') > ->belongs_to('slides') > ->has_and_belongs_to_many('**categories') > ; > } > > somehwat reminiscent of the recently updated DBIx::DataModel by Laurent Dami. It looks like you manually describe table relationships instead of having a "Loader" class figure all this out. At any rate, a full set of code samples for all common CRUD operations against the Sakila database is a welcome submission to DBIx::Cookbook. The example for fetching all records are shown for Rose::DB::Object, DBIx::Skinny and DBIx::Class - http://search.cpan.org/~tbone/DBIx-Cookbook-0.07/lib/DBIx/Cookbook/Recipe/Searching/fetch_all.pod I did many more operations for DBIx::Class. > > Does this belong in CPAN (once it's finished off and polished a decent bit > more)? > why not? and what does "DTO" stand for? > > > > Thanks, > > > > -- > Paul Bennett (PWBENNETT) >