#!perl use strict; use warnings; use DBIx::Skinny; use Text::Xslate; use Data::Section::Simple; my $vpath = Data::Section::Simple->new()->get_data_section(); my $tx = Text::Xslate->new(path => [$vpath]); { package MyModel; use DBIx::Skinny connect_info => { dsn => 'dbi:SQLite:', }; package MyModel::Schema; use DBIx::Skinny::Schema; install_table user => schema { pk 'id'; columns qw/id name/; }; }