#!perl -p s/beer/maple syrup/?s/ns/nc/:s/am/amme/&y/l//s?s/b.+i/toqu/:s/om/um/;s/er(?! [at])/re/g;s/\w.o\Kr/ur/g