(query-replace-regexp "\\(いい\\|わるい\\)\\(.+?\\)。" "\\2は\\1。")