Select Code to Download

  INSERT INTO test
  VALUES ( ?,? )
  RETURNING my_id INTO ?

  CREATE TABLE "SPL"."TEST" (
    "MY_ID" NUMBER NOT NULL ENABLE, 
...
    "MY_DESC" VARCHAR2(100), 
    CONSTRAINT "TEST_PK" PRIMARY KEY ("MY_ID")
  ) ;

  CREATE SEQUENCE  "SPL"."TEST_ID_SEQ"  
    MINVALUE 1 
...
    CACHE 20 
    NOORDER  
    NOCYCLE ;

  CREATE OR REPLACE TRIGGER "SPL"."BFR_INS_TEST_TRG" 
    before insert on TEST
...

  /
  ALTER TRIGGER "SPL"."BFR_INS_TEST_TRG" ENABLE;

#!/usr/bin/perl

...

$sth->finish();
$dbh->disconnect();