----- Forwarded message from Dmitry Trofimov <[EMAIL PROTECTED]> -----

From: Dmitry Trofimov <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Subject: DBI support for arrayshash

Hello.

Please include function selectall_arrayhash in next versions of DBI.
It should be useful for all people.

#################################################
# Get all hash records in array
#################################################
sub selectall_arrayhash{
 my $self = shift;
 my @res;

 my $sth = $self->{dbh}->prepare(shift);
 $sth->execute(@_);
 while(my $data=$sth->fetchrow_hashref){
  push @res, $data;
 };
 $sth->finish;

 return [EMAIL PROTECTED];
}

Regards Dmitry.

----- End forwarded message -----

Reply via email to