Jim,
The &DBI::errstr still produced nothing.
Your one liner did show Oracle in the list of Drivers.
Thanks for the effort.
p.s. I solved the original problem by removing 2 $ENV statements, (1 for ORACLE_HOME on the server, and 1 for TNS_ADMIN pointing to the tnsname.ora file on the PC). these...
How do I find out why a DBI->connect fials.
Using DBI to connect to an Oracle datbase, the connect fails but no diagnostics in the die clause produce anything.
e.g. $dbh = DBI->connect("dbi:Oracle: ...) or
die "Failed: $! $dbh->errstr $ora_errstr \n";
produces only the Failed...
How do I obtain a disk volume label in a Perl program running under Windows 32.
e.g. I have a CD Rom in my drive d:, how do I find the volume label of the CD Rom?
Any sugestions welcome,
Colin
Bob,
Tkwait doesn't work either.
Having done some research I found waitVariable - an inbuilt Tk method, and this works fine.
e.g.
After calling the sub-routine which dives off into Tk, code
$mw->waitVariable(\$wait_flag);
and in the Tk routines, after all the Tk stuff is finished...
Bob,
Thanks for the 'vwait' suggestion, but I am working with Tk not TCL.
I can't get vwait to work in Tk, I get messages like ' Can't locate object method "set" via package "masticman::flag"'
Colin
My objective: To read through a file & check for anomalies, if anomaly found, query user if a change is required; if yes, get the change and update the file record.
Process used:
1. Read the file into an array
2. Check the records in the array
3. If anomaly found in record
4. Query user with Tk...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.