sub decide() {
	$answer =~ m/^y/i ? yes() : not();
}