my $correct; if ($response eq 'q') { $quit = 1; } elsif ($response == $solution) { ++$correct; print "Correct! You have $correct answers\n";