| … | |
… | |
| 3451 | push(@student_values,$inVal); |
3451 | push(@student_values,$inVal); |
| 3452 | push(@adjusted_student_values,( $inVal - ($correctVal -$instructorVal) ) ); |
3452 | push(@adjusted_student_values,( $inVal - ($correctVal -$instructorVal) ) ); |
| 3453 | push(@differences, $diff); |
3453 | push(@differences, $diff); |
| 3454 | push(@instructorVals,$instructorVal); |
3454 | push(@instructorVals,$instructorVal); |
| 3455 | } |
3455 | } |
| 3456 | if ($errors eq '' or $options{error_msg_flag} ) { |
3456 | if (( not defined($errors) ) or $errors eq '' or $options{error_msg_flag} ) { |
| 3457 | $rh_ans ->{$options{stdout}} = \@differences; |
3457 | $rh_ans ->{$options{stdout}} = \@differences; |
| 3458 | $rh_ans ->{ra_student_values} = \@student_values; |
3458 | $rh_ans ->{ra_student_values} = \@student_values; |
| 3459 | $rh_ans ->{ra_adjusted_student_values} = \@adjusted_student_values; |
3459 | $rh_ans ->{ra_adjusted_student_values} = \@adjusted_student_values; |
| 3460 | $rh_ans->{ra_instructor_values}=\@instructorVals; |
3460 | $rh_ans->{ra_instructor_values}=\@instructorVals; |
| 3461 | $rh_ans->throw_error('EVAL', $errors) if defined($errors); |
3461 | $rh_ans->throw_error('EVAL', $errors) if defined($errors); |