hej jeg forsøger at oprette forbindelse til en Oracle-database ved hjælp af DBI og jeg får dette::

Føreren ikke har gennemført disconnect_all metode. i / opt /perl/lib/site_perl/5.8.0/sun4-solaris/DBI.pm linje 575
SLUT mislykkedes - opkald kø afbrudt.


til alle jeg kender, blev scriptet arbejde tidligere, men har pludselig standsede i orden.

Jeg kan ikke tage et spor eller finde den log da log4perl ikke er installeret. Jeg kan ikke installere nogen CPAN modul.

brug for hjælp::: Dette er hvad jeg bruger til connectibng::

my $ db \u003d DBI-> connect ( "DBI: Oracle: $ oracle_sid", "$ oracle_user", "$ oracle_passwd")

$ db-> (RaiseError) \u003d 1;
my $ sth \u003d $ db-> forberede ( "SELECT forespørgsel her ...");

$ sth-> execute ()

while (my @ row \u003d $ sth-> fetchrow_array)
(
my $ a \u003d $ row [0];
my $ b \u003d $ row [1];

næste medmindre $ a;
næste medmindre $ b;

)
$ db-> disconnect;

sproget er perl