Rookie Question

[Goodman Kristi - kgoodm]

I have this line of code in my program:

print "Did everything look ok? (Y/N)";
chomp ($check = <STDIN>);
$check = "\U$check";
if ("\U$check" ne "Y") {die "Well. . . go back and try again until you get
it right!!!\n"};

How would I fix it where the user did not have to ENTER after they typed a Y
or N.

Thanks for your help!