print
/^digi /&/nyo(\W|_){1,3}$/i|
/^petit /&/nyu(\W|_){1,3}$/i|
/^rabi .*[0-9A-Za-z]/|
/^gema /&/gema(\W|_){1,3}$/i|
/^piyo /&/pyo(\W|_){1,3}$/i?
'CORRECT (maybe)'
:'WRONG!'
,$/for<>