Need Help with DBI for oracle

[Ganesh Bendre]

Hi,

I am using the following code for fetching some data.
but not able to connect

*CODE:*
#!C:/Perl/bin/perl.exe

use DBI;
use DBD::Oracle;

print "Content-type: text/html \n\n";

$platform = "ORACLE";
$database = "I8Q.GRP.COM";
$tablename = "COUNTY_ADD";
$user = "dba";
$pw = "dbapass";

$dsn = 'dbi:Oracle:$database:in-gh01:1521';

$connect = DBI->connect($dsn, $user, $pw);

$query = "select ctycode,ctydesc from county_add";
$query_handle = $connect->prepare($query);

$query_handle->execute();

$query_handle->bind_columns(undef, \$ctycode, \$ctydesc);

while($query_handle->fetch()) {
   print "$ctycode, $ctydesc <br />";
}
*CODE END*
**
**
I am getting the following error when i try to run the above code
**
*Error:*
DBI connect('$database:in-gh01:1521','dba',...) failed: ORA-06401: NETCMN:
id driver designator (DBD ERROR: OCIServerAttach) at exequery2.pl line 21
Can't call method "prepare" on an undefined value at exequery2.pl line 25.
*Error END*

*I have installed *
*DBD::Oracle*
*DBI*
**
**
*i am stuck with this for almost one week
Please help me out*
**
*Ganesh.*
**