--- capa/capa51/CapaTools/rebuild.pl 1999/09/28 21:25:35 1.1 +++ capa/capa51/CapaTools/rebuild.pl 1999/11/18 17:55:24 1.2 @@ -62,7 +62,7 @@ # print "$ans_str\n"; ($s_num,$rest) = split(/ /,$first); (@ans_char) = split(/ */,$ans_str); - $s_num = uc($s_num) + $s_num = uc($s_num); $usr_ans = "$s_num" . "ans"; $usr_try = "$s_num" . "try"; if( $prob_cnt == 0 ) {