Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Branch: master
Fetching contributors…

Cannot retrieve contributors at this time

29 lines (18 sloc) 0.507 kB
#!/usr/bin/env perl
use Modern::Perl;
use DBIx::Class::Schema::Loader 'make_schema_at';
my $DEBUG = @ARGV and $ARGV[0] =~ /^\-[\-]*v/;
say $DBIx::Class::Schema::Loader::VERSION if $DEBUG;
my @dsn = 'dbi:SQLite:dbname=test.db';
my $options = {
debug => $DEBUG,
dump_directory => 'lib',
components => [qw/ InflateColumn::DateTime /],
generate_pod => 0,
};
make_schema_at(Schema => $options, \@dsn);
=head1 NAME
generate_dbic_schema
=head1 USAGE
perl generate_dbic_schema
=cut
Jump to Line
Something went wrong with that request. Please try again.