use strict;
use DBI;
use warnings;
use diagnostics;

my $sqlhost  = 'localhost';
my $sqlbase  = 'debloat';
my $user     = 'JHD';
my $password = 'JHD';

DBI->trace(5);
my $dbh      = DBI->connect(
               "DBI:mysql:database=$sqlbase;host=$sqlhost;port=3306",
               $user, $password);

exit (0);