Teng::Schema::Dumper - Schema code generator
use DBI; use Teng::Schema::Dumper; my $dbh = DBI->connect(@dsn) or die; print Teng::Schema::Dumper->dump( dbh => $dbh, namespace => 'Mock::DB', inflate => +{ user => q| use Mock::Inflate::Name; inflate 'name' => sub { my ($col_value) = @_; return Mock::Inflate::Name->new(name => $col_value); }; deflate 'name' => sub { my ($col_value) = @_; return ref $col_value ? $col_value->name : $col_value . '_deflate'; }; inflate qr/.+oo/ => sub { my ($col_value) = @_; return Mock::Inflate::Name->new(name => $col_value); }; deflate qr/.+oo/ => sub { my ($col_value) = @_; return ref $col_value ? $col_value->name : $col_value . '_deflate'; }; |, }, );
This module generates the Perl code to generate Teng::Schema instance.
You can use it by do "my/schema.pl" or embed it to the package.
do "my/schema.pl"
Teng::Schema::Dumper->dump(dbh =
This is the method to generate code from DB. It returns the Perl5 code in string.
The arguments are:
dbh
Database handle from DBI.
namespace
your project Teng namespace.
base_row_class
Specify the default base row class for Teng::Schema::Declare.
To install Teng, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Teng
CPAN shell
perl -MCPAN -e shell install Teng
For more information on module installation, please visit the detailed CPAN module installation guide.