sub dbiConnect {
    my $server = '<IP>';
    my $port   = reservedDBPort($server);