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

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

my $dbh = DBI->connect("DBI:mysql:database=$sqlbase;host=$sqlhost",
                       $user, $password, {RaiseError => 1});

exit (0);