Select Code to Download

use strict;

...
   print qq|<input name="in_vote" type="radio" value="option_$_">$opti
+ons[$_]</font>\n|;
   print "</td>\n</tr>\n";
}

select option.description from option
   inner join poll on option.poll_id = poll.id
   order by option.number