> Thanks for the reply. I have included the result set and some more of
the
> code. Your help is appreciated.
>
>
> my $dbh = DBI->connect("DBI:XBase:C:/Perl/progs/customer") or die
> $DBI::errstr;
> my $sth = $dbh->prepare("select ID, First_Name from customer") or die
> $dbh->errstr();
> $sth->execute() or die $sth->errstr();
> while (my $row = $sth->fetchrow_hashref()) {
> $returned_rows{$row->{'ID'}} = $row;
> print Data::Dumper->Dump([$row, $returned_rows], [qw($row
> $returned_rows)]);
> }
Kevin,
$Bill got your $ vs \% problem, but just FYI. In general it is not safe
to store a list of references from DBI methods, many (soon to be all) of
them recycle the ref, so you could end up with an array or hash of
identical refs.
Steve
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
