#!/usr/bin/perl -w
use strict;
use DBI;             #
use Tangram;         # <-- STEP 1
use Tangram::Deploy; #
use Employee qw($schema);  # <-- STEP 2

# Connect to the data source. <-- STEP 3
my $dsn  = "dbi:mysql:database=employees";
my $user = "demo";
my $pass = "open_sesame";
my $dbh = DBI->connect($dsn, $user, $pass);

# Deploy the schema. <-- STEP 4
$schema->deploy($dbh);

# Disconnect from the database. <-- STEP 5
$dbh->disconnect;