Perl使用Split或Regex提取XML标记属性

我正在开发一个文件上传系统，该系统还解析上传的文件，并根据上传文件中的信息生成另一个文件。正在上载为XML文件的文件。我只需要解析每个文件中的第一个XML标记，并且只需要获取标记中单个属性的值

示例XML：

<LAB title="lab title goes here">...</LAB>

或匹配=字符或“使用

/\=/ or /\"/

---

我也尝试过使用regex做类似的事情，但也没有运气。我不确定我是否只是没有使用正确的表达式，或者使用split/regex是不可能做到这一点的。如果在这方面有任何帮助，我将不胜感激，因为我仍然是Perl的新手。如果这类问题在其他地方得到了回答，我道歉。我做了一些搜索，但找不到解决方案。大多数线程建议使用XML解析Perl模块，如果我有安装它们的权限，我会这样做。

“但我不能使用CPAN”是一种让自己在Perl标记上被否决的快速方法（尽管不是我这么做的）。即使没有root，也可以使用CPAN。事实上，即使没有root，也可以使用CPAN。虽然我强烈推荐其中一些选项，但目前最简单的方法是下载一些纯Perl模块，并将它们包含在您的代码库中。有一个非常小但非常有用的XML/DOM解析器，名为很可能是这种过程的候选者。

“但我不能使用CPAN”是一种让自己在Perl标记上被否决的快速方法（尽管不是我这么做的）。即使没有root，也可以使用CPAN。事实上，即使没有root，也可以使用CPAN。虽然我强烈推荐其中一些选项，但目前最简单的方法是下载一些纯Perl模块，并将它们包含在您的代码库中。有一个非常小但非常有用的XML/DOM解析器，名为很可能是这种过程的候选对象。

现在是2013年。使用XML解析器..干杯，谢谢你提供的信息。现在是2013年。使用XML解析器..干杯，谢谢你提供的信息。谢谢你的回复和建议。我一定会调查Perlbrew。我承认我没有想到在没有根访问权限的情况下安装模块的方法，这很好我真蠢。谢谢你的回复和建议。我一定会调查Perlbrew。我承认我没有想到在没有root访问权限的情况下安装模块的方法，我真蠢。

/title/

/\=/ or /\"/