ANS: # line 2649
foreach $ans (@ans){
  $ans =~ s/^\s+//g; $ans =~ s/\s+$//g;
  $ans2 = &repipe($ans);
  if($ans ne "" && $ans2 =~ /^%SAQ%/){
    print "<input type=text name=$num value=\"$data{$num}\"><br>\n";
    last ANS;
  }
  elsif($ans ne "" && $ans2 =~ /^%SAT%/){
     print "<textarea name=$num rows=5 cols=40>$data{$num}</textarea><br>\n";
     last ANS
  }
  elsif($ans ne "") {
    if($esc_num eq $ans){ $ck = " CHECKED";}
    else{ $ck = ""; }
    print "<input type=radio name=$num value=\"$ans\"$ck>$ans2<br>\n";
  } 
}