BEGIN {
       $ENV{NLS_LANG}           = "AMERICAN_AMERICA.UTF8";
       $ENV{OCI_NLS_CHARSET_ID} = "AMERICAN_AMERICA.UTF8";
        $ENV{ORACLE_HOME} = #The path to the instant Oracle client";
        }
    #Connect to database
    my $DBHandle = DBI->connect(
        "dbi:Oraclehost=$host;sid=$sid;port=$port",
        $userName,
        $passWord
    ) or die "Connection Error: $DBI::errstr\n";