![[BACK]](/icons/back.gif){kind=icon}
Return to rebuild.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / capa / capa51 / CapaTools|
Return to rebuild.pl CVS log | Up to [LON-CAPA] / capa / capa51 / CapaTools |
| version 1.1, 1999/09/28 21:25:35 | version 1.2, 1999/11/18 17:55:24 |
|---|---|
| Line 62 | Line 62 |
| # print "$ans_str\n"; | # print "$ans_str\n"; |
| ($s_num,$rest) = split(/ /,$first); | ($s_num,$rest) = split(/ /,$first); |
| (@ans_char) = split(/ */,$ans_str); | (@ans_char) = split(/ */,$ans_str); |
| $s_num = uc($s_num) | $s_num = uc($s_num); |
| $usr_ans = "$s_num" . "ans"; | $usr_ans = "$s_num" . "ans"; |
| $usr_try = "$s_num" . "try"; | $usr_try = "$s_num" . "try"; |
| if( $prob_cnt == 0 ) { | if( $prob_cnt == 0 ) { |