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