foreach(@val)
{
  chomp;
  print "<option value=".$_.">".$_."\n";
}