#!/usr/bin/perl
use warnings;
use strict;
use DBI;
my $user = 'charrison';
my $pass = '********';
my $conn = 'DBI:mysql:database=dwcontact;host=192.168.200.39;port=3402;mysql_ssl=1';
my $dbh  = DBI->connect($conn, $user, $pass);

##</code><code>##

#!/usr/bin/env perl
use warnings;
use strict;
use DBI;
my $user = 'charrison';
my $pass = '********';
my $conn = 'DBI:mysql:database=dwcontact;host=192.168.200.39;port=3402;mysql_ssl=1';
my $dbh  = DBI->connect($conn, $user, $pass);

##</code><code>##

DBI connect('database=dwcontact;host=192.168.200.39;port=3402;mysql_ssl=1','charrison',...) failed: SSL connection error: self signed certificate in certificate chain at ...