Okay, here is it new's years eve and I am writting code.
I think I should get extra XP just for that alone : )

Anyway, what I came up with was:
<OUTER LOOP>
  {
	undef(@selections);
	while ((my $choice) = $sth->fetchrow_array())
	  {
	    push(@{ $selections{$_} },$choice);
	  }
  }
<END OUTER LOOP>

I tried that arrayref idea, but then I had to deference it
again and it just seemed unnecessary unless I misunderstood
what you were trying to say.

Anyway, this all worked great and I thank all who helped out.