Re^3: How to store the data fetched from the database in perl

[frozenwithjoy]

I haven't used this module before, so am not totally familiar with this method, but does this work?

my %data;
while ( my $result = $sth->fetchrow() ) {
    $data{$result} = 1;
}