Here's one for oracle
sub GetOracleFieldLengths
{
my ($TABLE)[EMAIL PROTECTED];
my (%FIELDLENGTHS, %FIELDTYPES);
if ($TABLE=~/\.(\S+)$/)
{
$TABLE=$1;
}
my $fieldlengths=$dbh-prepare(SELECT COLUMN_NAME, DATA_TYPE, DATA_LENGTH
from ALL_TAB_COLUMNS where
You need Oracle DBD. If it's there there will be per5~/DBD/Oracle.pm and an
Oracle directory.
On 5 Jan 2006 19:01:35 -, Sunil A V wrote
Hi,
I am trying this combination:
perl: v5.61
DBI: 1.25
Oracle: 10g
OS: Solaris Unix
The directory /home/me/perlmods contains DBI.pm, DBI dir,
I am having trouble using date operations in Oracle via DBI.
The following code fails to return any results.
$selectStatement.=SELECT s.NETWORK_NAME as NETWORK_NAME,;
$selectStatement.= TO_CHAR(s.OUTAGE_START,'MM/DD/ HH24:MI:SS') as
OUTAGE_START,;
$selectStatement.=