Select Code to Download

my ($choice1,$choice2,$choice3,$choice4,$choice5,$choice6);
my ($votes1,$votes2,$votes3,$votes4,$votes5,$votes6);
...
{
 .
 .

 
%results = ( $choice1 => $votes1,
             $choice2 => $votes2,
             $choice3 => $votes3,
             .
             . );