my $db = 'ram';
my $host = ''; # hostname
my $port = ''; # portnumber
$dbh = DBI->connect("DBI:mysql:database=$db;host=$host;port=$port",'root','root') or die "Connection Error: $DBI::errstr\n";