Home : General : Perl Programming :

General: Perl Programming: Re: [Wil] $sth->fetchall_array: Edit Log

Here is the list of edits for this post
Re: [Wil] $sth->fetchall_array
I'm not sure if it's the fastest way but it works. I ended up using:

Code:
my $data = $sth->fetchall_arrayref({});
$sth->finish();

foreach (@$data) {
$res{$_->{Email}} = $_->{Email};
}

$DBH->disconnect();

return %res;

Last edited by:

RedRum: Sep 28, 2001, 1:48 PM

Edit Log: