my %result;
while ( my $rec = $data->fetchrow_hashref ) {
    push @{ $result{ $rec->{"ID"} } }, $rec->{"item"};
}