use DBI;
my $dbh = DBI->connect("dbi:ODBC:MQIS","USER","PASSWORD");