Help for this page

Select Code to Download

Select or download this

my $dbh = DBI->connect("dbi:Oracle:host=localhost;sid=testdb1", "user1
+", "pass1", 
+{ ora_dbh_share => \$orashr} ) || die $!;