TheSchwartz::Schema (and auto-deployment stub)
Published · Sunday, 22 March 2009 (Updated · 8 June 2020)
Note: this won’t work as currently posted. See this article instead: Catalyst Model #9: TheSchwartz.
Here’s the code: TheSchwartz-Schema.tgz. See also DBIx::Class, DBIx::Class::Schema::Loader, and TheSchwartz.
Contents–
TheSchwartz/ TheSchwartz/Schema/ TheSchwartz/Schema/Result/ TheSchwartz/Schema/Result/Error.pm TheSchwartz/Schema/Result/Exitstatus.pm TheSchwartz/Schema/Result/Funcmap.pm TheSchwartz/Schema/Result/Job.pm TheSchwartz/Schema/Result/Note.pm TheSchwartz/Schema.pm deploy.pl
And in case you want a preview before buying the free beer. This is what the deploy script/stub looks like–
use strict; use warnings; use FindBin; use lib "$FindBin::Bin/lib"; use TheSchwartz::Schema; die "Give DB connection args! E.g.:\n", " dbi:SQLite:job_queue.sqlt\n" unless @ARGV; my $schema = TheSchwartz::Schema->connect(@ARGV); $schema->deploy;






« How to force NULL
values into empty or undefined fields via DBIx::Class · tcsh alias to get the version of a Perl module »
« Perl resources, modules, and sample code »