a=[]
while (g=gets)!=nil do
    a.push(g.chomp.partition(" "))
end
c=["digi","petit","rabi","gema","piyo"]
norm=[/[nN][yY][oO][^a-zA-Z0-9]{0,3}$/, \
      /[nN][yY][uU][^a-zA-Z0-9]{0,3}$/, \
      /[a-zA-Z0-9]+/, \
      /[gG][eE][mM][aA][^a-zA-Z0-9]{0,3}$/, \
      /[pP][yY][oO][^a-zA-Z0-9]{0,3}$/]

a.length.times do |i|
    cr=a[i][0]
    st=a[i][2]
    j=0
    while j<c.length&&cr!=c[j] do
        j+=1
    end
    if j>=c.length
        puts "WRONG!"
        next
    end
    if st=~norm[j]
        puts "CORRECT (maybe)"
    else
        puts "WRONG!"
    end
end