my $dbh = DBI->connect( $table, $user, $pass) || die "Database connection could not be established! Please contact the administrator.\n";