while (<GRADE>) {
    $test = $_;
}