Hi there,
1st Question:
=========
I have a perl script code running well on Linux at Wintel machine, and want
to migrate it to Perl at HP Unix (PA-Risc).
However, I failed to compile the DBI and DBD:Oracle module under HP Unix,
due to lack of gcc C-compiler, I only have HP CC.
The module I download are from :
http://search.cpan.org/author/TIMB/DBD-Oracle-1.12/
http://search.cpan.org/author/TIMB/DBI-1.30/
2nd question:
=============
Do you know of any other method that I can connect to Oracle database with
Perl4 (older Perl).
_______________________________________________________________
Regards,
KengSeng Tan
Attached code:
========================
#!/perl/bin/perl
use DBI();
$dbh = DBI->connect('dbi:Oracle:test', 'kstan', 'pwd') or &errorhandling;
print <<EOF;
Content-type: text/html
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>Hello World</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<H2> Hello World </H2>
</BODY>
EOF
}
$sth = $dbh->prepare(qq{select field1,field2 from test where
field1=$in{field1}});
$sth->execute;
if (my @ref=$sth->fetchrow_array()) {
$x1 = $ref[1];
$y1 = $ref[2];
} else {
print "<h3>Sorry, not found.</h3>";
}
$dbh->disconnect;
