regexps = [
	/^digi .*nyo[^a-zA-Z0-9]{0,3}$/,
	/^petit .*nyu[^a-zA-Z0-9]{0,3}$/,
	/^rabi .*[a-zA-Z0-9].*$/,
	/^gema .*gema[^a-zA-Z0-9]{0,3}$/,
	/^piyo .*pyo[^a-zA-Z0-9]{0,3}$/]

while s = gets
	if !["digi","petit","rabi","gema","piyo"].include?(s.split[0])
		puts "WRONG!"
		next
	end
	s.downcase!
	count = 0
	regexps.each do |regexp|
		count += 1 if s =~ regexp
	end
	puts (count == 1 ? "CORRECT (maybe)" : "WRONG!")
end