Help, what's going wrong?

Hi,
I'm newbie to oracle, just wrote a perl script to insert some data into database daily. It doesn't work and with error message as below. But worked fine if executed the script under ksh. Enclosed with

part of code :-
sub connect_DB
{

   use DBI;
$DSN = "DBI:Oracle:CCS1";
$user = "ccsdba";
$pw = "ccsdba";
$dbh = DBI->connect($DSN, $user,$pw)

      || die "cannnot connect: $DBI::errstr\n" unless $dbh;    return;
}

Error message :- Received on Wed Dec 27 2000 - 00:10:33 CST