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