package NGS::DB;
use Moo;
use Data::Dumper;
use FindBin qw($Bin);
use lib '/home/raj/perl-lib';
use Local::DB;
has dbix => ( is => 'lazy' ); # returns DBIx::Simple object
#-------------------------------------------------------------------------------
sub _build_dbix {
my $self = shift;
my $db = "$Bin/../ngs.sqlite";
my $dsn = "dbi:SQLite:dbname=$db";
my $dbix = Local::DB->dbix({ dsn => $dsn }); # warn Dumper $dbix;
return $dbix;
}
1;