Oracle FAQ | Your Portal to the Oracle Knowledge Grid |
![]() |
![]() |
Home -> Community -> Mailing Lists -> Oracle-L -> Oracle -> Perl
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
------_=_NextPart_001_01C031C4.ACE3A508
Content-Type: text/plain;
charset="iso-8859-1"
Hi all,
Our Intranet department tries to connect to Oracle using a Perl script. Is this script enough for the connection ? What about OAS ?
We run on Solaris 2.6, Oracle 7.3.4 and OAS 4.0.7
#!/usr/local/bin/perl
use DBI;
my($db, $csr, $ret_val);
# Connect to an Oracle database. # Modify the following with suitable values for the net alias and your # db userid and password
or die "Unable to connect: $DBI::errstr";
TIA
Luc Demanche
Cetelem
Tel.: 01.46.39.14.49
luc.demanche_at_cetelem.fr
------_=_NextPart_001_01C031C4.ACE3A508
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META NAME=3D"Generator" CONTENT=3D"MS Exchange Server version =
5.5.2448.0">
<TITLE>Oracle -> Perl</TITLE>
</HEAD>
<BODY>
<P><FONT SIZE=3D2 FACE=3D"Arial">Hi all,</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Courier New">Our Intranet department tries to =
connect to Oracle using a Perl script. Is this script enough for =
the connection ?</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New">What about OAS ?</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Courier New">We run on Solaris 2.6, Oracle =
7.3.4 and OAS 4.0.7</FONT>
</P>
<P><FONT SIZE=3D2 FACE=3D"Courier New">#!/usr/local/bin/perl </FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New">use DBI; </FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New">my($db, $csr, $ret_val); =
</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New"># Connect to an Oracle =
database. </FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New"># Modify the following with =
suitable values for the net alias and your </FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New"># db userid and password =
</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier New"> $db =3D =
DBI->connect('dbi:Oracle:your_db_alias','your_user','your_password') =
</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Courier =
New"> or die "Unable to =
connect: $DBI::errstr";</FONT>
</P>
<BR>
<P><FONT SIZE=3D2 FACE=3D"Arial">TIA</FONT>
</P>
<BR>
<P><B><I><FONT FACE=3D"Arial">Luc Demanche</FONT></I></B><I></I>
<BR><FONT SIZE=3D2 FACE=3D"Arial">Cetelem</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">Tel.: 01.46.39.14.49</FONT>
<BR><FONT SIZE=3D2 FACE=3D"Arial">luc.demanche_at_cetelem.fr</FONT>
Received on Mon Oct 09 2000 - 02:43:54 CDT
![]() |
![]() |