Select Code to Download

use DBI;
$DSN  = "dbi:Oracle:host=localhost;sid=essinv;port=1521";
...
# Disconnect from the database
$sth->finish;
$dbh->disconnect;