perl - 在 Perl 中解析 latex 文件

Question

为这个非常基本的问题道歉!

我只想读入一个 latex 文件(基本上是文本)并输出所有(比如说)定理，这些定理始终采用以下格式

\begin{theorem}
some lines of latex
\end{theorem}

我一直认为 Perl 是最合适的语言!

当然，我只懂非常基础的 C++ 和 Java 编程，几乎不懂 Perl。

尽管如此，我目前可以读取文本文件，并逐行处理它。

看起来最基本的方法是:

($string =~ /pattern/) 

当我读到诸如 ?、*+、$ 等控制代码时，我开始感到困惑。

有任何简单的引用资料或链接可以帮助我入门吗？

(我把它放在这里而不是 Tex 站点，因为它通常对阅读文本文件很有用，而不仅仅是 LaTeX!)

Answer 1

如果您使用的是 Unix-y 机器(包括 Mac)，对于这么小的任务，您应该首先使用 sed:

$ sed -ne '/^\\begin{theorem}$/,/^\\end{theorem}$/p' doc.tex

但是，如果您使用的是 Windows，则不会将 sed 与操作系统捆绑在一起，并且 perl 更容易安装 AIUI，因此这里是等价物:

> perl -ne 'print if /^\\begin\{theorem\}$/.../^\\end\{theorem\}$/;' doc.tex

您可能会注意到这两个命令之间有明显的相似之处。那不是偶然的； Perl 从许多旧的 Unix 文本处理实用程序中汲取灵感，包括 sed。