Select Code to Download

my $dsn = "DBI:Proxy:hostname=$pghost;port=12400;dsn=DBI:Oracle:$pgdat
+abase;
use vars qw($conn);
...

        print "$sql1<BR>\n";
        my $sth1 = $conn->prepare($sql1);

        $sth1->bind_param(1, $temp, 
{ora_field => 'FILE_DATA', ora_type =>113 });
        $sth1->execute($temp);