![]() ![]() | ![]() |
version 1.19, 2001/11/28 18:15:14 | version 1.20, 2001/11/28 18:18:17 |
---|---|
Line 127 sub ExtractStudentData { | Line 127 sub ExtractStudentData { |
if ($TempHash{"$part.Code"} eq '*') { | if ($TempHash{"$part.Code"} eq '*') { |
$ProbNo++; | $ProbNo++; |
if (($TempHash{"$part.Tries"}<10) || | if (($TempHash{"$part.Tries"}<10) || |
($TempHash{"$part.Tries"} eq '' ) { | ($TempHash{"$part.Tries"} eq '')) { |
$TempHash{"$part.Code"}=$TempHash{"$part.Tries"}; | $TempHash{"$part.Code"}=$TempHash{"$part.Tries"}; |
} | } |
} | } |