To get the number from a sequence in Oracle you can do a quick select like:

my $sth = $dbh->prepare("select MY_SEQUENCE.NEXTVAL from DUAL");
[download]

and this will give you the next number from Oracle. Dual is a magic table. It is there to ask the Database different questions.

--BigJoe

Learn patience, you must.
Young PerlMonk, craves Not these things.
Use the source Luke.