[Microsoft][ODBC SQL Server Driver][DBNETLIB]SSL Security error (SQL-08001) [state was 08001 now 01000]
[Microsoft][ODBC SQL Server Driver][DBNETLIB]ConnectionOpen (SECCreateCredentials()). (SQL-01000) [state was 01000 now 01S00]

##</code><code>##

sub get_connection {
    my ($DSN, $DBServer, $DBUser, $PW) = @_;
    my $dbh = DBI->connect("dbi:ODBC:Driver={SQL Server};Server=${DBServer};DSN=${DSN};UID=${DBUser};PWD=${PW};KeepAlive=1");
    return $dbh;
}