Aside from a couple of typos your code worked great. I appreciate it. Now I shall sit back and study it.

NOTE: Typos were on lines 12 & 13.

Im not sure if Oravel is what you wanted since I have not checked the DBI docs yet but I changed it to Oracle (knowing that that is a proper driver for DBI) and it worked
Original
$dbh = DBI->connect("dbi:Oravel:$DB",$UN,$PW,
Changed
$dbh = DBI->connect("dbi:Oracle:$DB",$UN,$PW,

This next one was simply a case of a missing bracket.
Original
(...{AutoCommit => 0, RaiseError => 1) or
Changed
(...{AutoCommit => 0, RaiseError => 1}) or

This is really great! Thanks for the example work.

----------
- Jim