Select Code to Download

 CREATE TABLE cloverleaf_ingestion(
    pk NUMBER(20),
    File_name VARCHAR2(200),
...
    hdfs_file_size_in_bytes NUMBER(22),
    CONSTRAINT cloverleaf_ingestion_pk PRIMARY KEY (pk)
);

sub getOracleRowHahs{
    
...
    $odbh->disconnect();
    return $tableref;
}

    my $sdbh = DBI->connect($sqldsn, $sqluser, $sqlpass) || die "Can't
+ connect to mysql db:$DBI::errstr\n";
    my $odbh = DBI->connect($oracledsn, $oracleuser, $oraclepass) || d
+ie "Can't connect to oracle db:$DBI::errstr\n";
...

    $sdbh->disconnect()    ||    die "Error in disconnect to mysql: $D
+BI::errstr\n";
    $odbh->disconnect()    ||    die "Error in disconnect to oracle: $
+DBI::errstr\n";