Переформатирование документа LaTeX по perl

У меня есть документ LaTeX в котором изменения в тексте и уравнения выполняются красным цветом, чтобы их можно отличить от немодифицированного текста:

 {\color{red} MODIFIED TEXT OR EQUATION GOES HERE.} 

Это изменение может быть одним словом, фразой, предложением, абзацем или уравнением. Например:

  \pi \rho \hat{\bf x} \int\omega_{\color{red} \theta} 

или

 {\color{red} This work presents the ``numerical study'' of convection in vertical annuli;} 

Как я могу написать perl one-liner, который может заменить {\color{red} MODIFIED TEXT OR EQUATION GOES HERE.} К MODIFIED TEXT OR EQUATION GOES HERE. ? Я хочу удалить {\color{red} и правую фигурную скобку } по всему документу LaTeX .

 perl -p -i -e 's/{\\color{red}(.*)}/\1/g' filename 

объяснение флагов (от https://stackoverflow.com/a/6302045/330830 ):

-p: Помещает цикл печати вокруг вашей команды, чтобы он воздействовал на каждую строку стандартного ввода. Используется в основном так, что Perl может побить штаны с awk с точки зрения мощности и простоты 🙂

-e: Позволяет вам предоставлять программу как аргумент, а не в файл. Вы не хотите создавать файл сценария для каждого маленького Perl-лайнера.

-i: Изменяет входной файл на месте (делает резервную копию оригинала). Удобно изменять файлы без процесса {copy, delete-original, rename}.

Попробуй это:

 $ echo "{\color{red} MODIFIED TEXT OR EQUATION GOES HERE.}" | \ perl -pe 's/\{\\color\{red\} (.*?)\}/$1/g' MODIFIED TEXT OR EQUATION GOES HERE.