<form>
  Foo <input value="foo" type="radio" name="pic" /><br />
  Bar <input value="bar" type="radio" name="pic" /><br />
  Baz <input value="baz" type="radio" name="pic" />
  </form>

There are a couple of ways to make radio buttons in Perl without to much fuss ... the first is by brute force, much like you did in your question. However, since the "stuff" from your tab delimited file is already stored in the array @fields, we can iterate across the loop and not have to worry about whether or not we are dealing with the second index or the eleventh index:

print "<form>\n";

for my $field (@fields) {
   print qq|<input value="$field" type="radio" name="pic" /><br />\n|;
}

print "</form>\n";
[download]

use CGI qw(:standard);

print start_form,

   radio_group(-name => 'pic', -values => \@field),

   end_form,
;
[download]

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)