What are tags?
How to bind an Oracle RAW to perl-variable within a select
Hello Guest		   
  • Login
• Register…
• Start blog		   • Who, Where, When
• What can I do?
• What to Read?		   • Polls
• Avatars
• Interests		   • Cities and Countries
• Random blog
• Users search		   • Search
• Games
• Tests
• QAIX		   • Сообщества
• Talxy Chat
• Horoscope
• Online		  
Зарегистрируйся!
QAIX > Perl web-programming > How to bind an Oracle RAW to perl-variable within a select 11 December 2003 19:24:53
  Recent blog posts: 
Free iPod nano raffle for…
Aimersoft 2008 Christmas promotion: "Free iPod nano raffle for Chrismas" and "Buy 1 Get…

How to convert Rhapsody to…
Music purchased from Rhapsody is under DRM protection, which stops customers from playing the downloaded&helli­p;

PS3 firmware update adds full…
Eric Lempel, Sony's Director of PlayStation Network Operations, has posted on the official PlayStation 3…

Nintendo makes $6 profit on…
According to Macquarie Securities analyst David Gibson, Nintendo makes $6 USD operating profit on each…

Maintenance in winter
Skin for winter very easy to do, if does not supplement the moisture in time, like persimmons, flat and…

'Jasper' Xbox 360s finally…
'Jasper' Xbox 360s finally available According to a flooding of posts over at xbox-scene, it appears…

How to transfer Napster music…
Music purchased from Napster is under DRM protection, which stops customers from playing the downloaded&helli­p;

The song my brother taught me
Don't let your heart be hardened Don't let your love grow cold May it always stay so childlike May it…

My brother taught me this…
God grant me the serenity to accept the things I cannot change; courage to change the things I can;…

baz-baz-baz-baz pam-parabaram…
baz-baz-baz-baz pam-parabaram baz-baz-baz-baz pam-parabaram baz-baz-baz-baz pam-parabaram-baz ba-ra-ba…

  They have birthday today: 
xiongchong
henna diah
  Forums:   
    topic feeds

• QAIX  all topics, blogs and comments

• PHP web-programming

• Perl web-programming

• ASP web-programming

• Visual Basic Programming

• .Net Development

• C/C++ Programming

• Java Programming

• Javascript web-programming

• Apache HTTP Server

• Web-design

• Web-hosting, dedicated, colocation

• HTML web-programming

• XML development

• General Web-programming

• Content Management Systems

• ColdFusion

• Search Engine Optimization

• Hardware

• Software, Computer Help

• MySQL database development

• PostgreSQL database development

• MS Access database development

• Oracle database development

• MS SQL database development

• Informix database development

• Buy / Sell

• Open discussion

• Anonymous
  Discuss: 
why infix:<div>:(Int, Int…
HaloO, I realized from the typed literal thread that S03 now explicitly states that div on two Ints…

[rt.cpan.org #41329] VMS…
<URL: http://rt.cpan.org/­Ticket/Display.html?­id=41329 > Thanks, applied

how to write literals of some…
Hello, I'm wondering how to write anonymous value literals of some Perl 6 basic types, and I didn't…

Files, Directories, Resources…
The S16: chown, chmod thread seems to be too unix-focussed. Perl6 is being born in a world dominated by…

Support for ensuring invariants…
Hi all, I occasionally find myself annoyed at having to do something like this (I use Perl5 vernacular…
  Recent forum topics: 
why infix:<div>:(Int, Int…
HaloO, I realized from the typed literal thread that S03 now explicitly states that div on two Ints…

[rt.cpan.org #41329] VMS…
<URL: http://rt.cpan.org/­Ticket/Display.html?­id=41329 > Thanks, applied

how to write literals of some…
Hello, I'm wondering how to write anonymous value literals of some Perl 6 basic types, and I didn't…
  Recent forum comments:
RE: Updating A Portion Of A Site
Thanks! I remembered just before I came back to check. It's amazing the things you forget. Thanks…

RE: Updating A Portion Of A Site
Use a FrontPage include file - see Help on Included Content. Or, if all pages are asp or PHP, use a…

RE: Index Files
What they are telling you is the home page of your site (before you publish it) must be named index.htm…

RE: Website diifers from local copy
I see it as a 40x68 icon (clear your cache) - as for the position check w/ Google API help Neither issue…

RE: Forced submit
"Ellie" <ellymay999nospam@n­ospamnetzero.com> wrote in message…

RE: access denied
IUSR account doesn't have access to cmd.exe by default (assuming you are using anonymous…

RE: access denied
Hey guys, I'm totally out of my league here, I don't even know how I got stuck with this problem, it's…

RE: Forced submit
Ellie wrote on 05 sep 2008 in microsoft.public.in­etserver.asp.general­: You cannot…

RE: [patch@34995] vms.c - Memory…
On Wed, Dec 3, 2008 at 7:38 PM, John E. Malmberg <wb8tyw@qsl.net> wrote: Thanks, applied as…

RE: why infix:<div>:(Int, Int…
On Thu, Dec 4, 2008 at 3:26 PM, David Green <david.green@telus.­net> wrote: Using…
  Moderators:
 Administrator
 Protorioris

How to bind an Oracle RAW to perl-variable within a select

Verbrugghen Johan 11 December 2003 19:24:53
 Hi,

After many attempts I'm failing to make the DBD::Oracle driver to bind an output variable of a select
of a RAW database field to a perl-variable, *without* the implicit conversion of the field value to its HEX-format.
For non-select statements it works smoothly to bind perl-variables to this type of fields.

All help is strongly appreciated.

Thx,

Johan

-------------------­--------------------­--------------------­--------------------­--------------------­--------------------­------
ENV:
DBI 1.32 - DBD::Oracle 1.12 - HPUX11.11 - Oracle 9.2

TABLE:
create table rawtab (col raw(2000))

TEST-script:
#!perl -w
use DBI;
$dbh = DBI->connect( "DBI:Oracle:" , "","", {PrintError => 1, AutoCommit => 1})
or die $DBI::errstr . "\n";
my ($sth, $raw);
# cleanup first
$dbh->do("truncate table rawtab") or die $DBI::errstr . "\n";
#put a record
$sth = $dbh->prepare("inse­rt into rawtab values (?)\n") or die $DBI::errstr . "\n";
$raw='H';
$sth->bind_param(1,­ $raw , { ora_type => 23 });
$sth->execute;
#get it back
$sth = $dbh->prepare("SELE­CT col INTO :col from rawtab\n") or die $DBI::errstr . "\n";
$sth->bind_col(1, \$raw , { ora_type => 23 });
$sth->execute;
$sth->fetch;
print "raw: $raw\n"; # <-- here the H should come again, but we get the HEX-string 48
$sth->finish;
$dbh->disconnect;
exit;


Add comment
 

Add new comment

As:
Login:  Password:  
 
 
  
 
Пожалуйста, относитесь к собеседникам уважительно, не используйте нецензурные слова, не злоупотребляйте заглавными буквами, не публикуйте рекламу и объявления о купле/продаже, а также материалы нарушающие сетевой этикет или УК РФ.

QAIX > Perl web-programming > How to bind an Oracle RAW to perl-variable within a select 11 December 2003 19:24:53
see also:
How long?
Any add-on software for searching by…
Search Engines To Avoid
пройди тесты:
see also:
My heart.....
Memories......
Times......
  Copyright © 2001—2008 QAIX
Idea: Miсhael Monashev
Помощь и задать вопросы можно в сообществе support.qaix.com.
Сообщения об ошибках оставляем в сообществе bugs.qaix.com.
Предложения и комментарии пишем в сообществе suggest.qaix.com.
Информация для родителей.
Write us at:
If you would like to report an abuse of our service, such as a spam message, please .