RE: DBI use with DBD:Oracle module

[Wilson, Doug]

> > > my $sth= $dbh->prepare($query);
> > > $sth->execute();
> > >
> > > my $rawRef;
> > >
> > > while(($rawRef= $sth->fetchrow_arrayref())) {
> > >   push(@choices, $rawRef->[0]);
> > > }

It probably won't help, but you could replace this whole
section with:

my $choices = $dbh->selectcol_arrayref($query);
or
my @choices = @{$dbh->selectcol_arrayref($query)};

Cheers,
Douglas Wilson