<>;for(<>){ while(s/(.*)W(.*)G(.*)R$/$1$2$3/){ } print /[GR]/?possible:impossib.e,$/; }