Rewriting using Data.Text