Hi Sachin,
Hopefully, I've not completely misunderstood your question. I'm
stuggling with how to interpret what you mean by the "&char" data
value: that looks like C notation for a pointer. If by "&char is
being stored in that you column" you mean it is a CLOB or other
type of large object, you may need to DBI blob_read method,
depending on it's length and the version of the DB2 database.
The blob_read is a Statement Handler method and is employed
something like this (DATA is a LOB in this case).
my $sth = $dbh->prepare ('select $moid from catenv.cattabl');
$sth->execute();
my $resultsValue = 0;
my $count = 0;
while ( $resultsValue = $sth->fetch() ) {
$count++;
if ( open ( OFILE, sprintf (">ofile.%03d", $count ))) {
# we got some LOB data.
while ( $buff = $sth->blob_read(1,0,4096) ) {
print OFILE $buff;
$buff = q();
}
}
else {
printf STDERR ("Cannot open output file #%03d", $count);
}
}
}
else {
printf STDERR ("Cannot open output file: $!\n");
}
At this point, the data LOB data for each record will be stored in
a files named ofile.001, ofile.002, ... ofile.00n in your current
working directory.
I hope I'm getting at what you are asking.
stph
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, February 27, 2002 5:28 AM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: SELECT \$moid FROM xyz.abc
Hello,
Still need help.....
So far the discussions have revolved around getting the $moid to be passed
on to DB2.
I think this is already being done because I do get a list.
The problem is that the list is all SQL_BINARY data since &char is being
stored in that column.
The question is : How do I DEREF the address?
[snip...]