问题标签 [perl]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
14 回答
40923 浏览

html - 正则表达式匹配所有 HTML 标签,除了

我需要使用 Perl 中的正则表达式匹配和删除所有标签。我有以下内容:

但这仍然与结束</p>标签匹配。关于如何与结束标签匹配的任何提示?

请注意,这是在 xhtml 上执行的。

0 投票
1 回答
2665 浏览

xml - 使用 Perl 解析 XML 元素和属性

所以我写了一些 perl 来解析从Amazon Web Services返回的结果。我正在使用该XML::Simple软件包。在大多数情况下,当我拉出一个元素时,一切正常。然而,我遇到的问题是当一个元素也有一个属性时。然后我得到一个错误,该项目是一个哈希。

如果我想获得 DVD 的运行时间,我会这样做:我刚刚创建了一个项目来保存这个一次性项目的特定信息。

有没有一种方法可以从一个项目中同时访问元素和属性?

0 投票
2 回答
3554 浏览

xml - 你如何使用 XML::Parser 和 Style => 'Objects'

的手册页XML::Parser::Style::Objects是可怕的。一个简单的 hello world 风格的程序真的很有帮助。

我真的很想做这样的事情:(当然不是真正的代码)

0 投票
14 回答
28823 浏览

perl - 如何在 Perl 中锁定文件?

在 Perl 中创建文件锁的最佳方法是什么?

最好是在文件上聚集还是创建一个锁定文件来放置锁定并检查锁定文件上的锁定?

0 投票
9 回答
1019 浏览

regex - 正则表达式用 bool 替换 Boolean

我正在研究最近从 X/Motif 转移到 Qt 的 C++ 代码库。我正在尝试编写一个 Perl 脚本,它将所有出现的布尔值(来自 X)替换为 bool。该脚本只是做一个简单的替换。

有几个条件。

1) 我们的代码中有 CORBA,并且 \b 匹配不应更改的 CORBA:: Boolean
2) 如果它被找到为一个字符串,它不应该匹配(即“布尔”)

更新:

对于#1,我使用了lookbehind

对于#2,我使用了前瞻。

这很可能适用于我的情况,但以下改进如何?

3)如果在字符串中间,则不匹配(感谢nohat)。
4)如果在评论中,不要匹配。(// 或者 /**/)

0 投票
4 回答
1452 浏览

perl - 如何清除 Class::DBI 的内部缓存?

我目前正在为现有数据库结构进行 Class::DBI 的大型实现,并且遇到了从 Class::DBI 清除缓存的问题。这是一个 mod_perl 实现,所以一个类的实例在它被访问的时间之间可能很旧。从手册页中我发现了两个选项:

和:

现在,当我将 clear_object_index() 添加到 DESTROY 方法时,它似乎在运行,但实际上并没有清空缓存。我可以手动更改数据库,重新运行请求,它仍然是旧版本。purge_object_index_every 表示它每 n 个请求清除一次索引。将此设置为“1”或“0”,似乎可以清除索引......有时。我希望这两个中的一个可以工作,但由于某种原因,它并不是每次都这样做。更像是五分之一。

有什么建议可以清除这个吗?

0 投票
3 回答
835 浏览

perl - 为什么 SGML::Parser::OpenSP 找不到符号 __ZTI15SGMLApplication?

我正在尝试从 cpan shell“安装 SGML::Parser::OpenSP”,但在第一次“make test”时失败。如果我进入构建目录并运行 make test,我也会得到同样的错误。

我相信下面的输出是相关部分。请注意当 perl 到达新库的“使用”行时找不到符号。那里列出的文件存在并且是可读的。当我运行 unix 命令“nm”时,它确实显示了该符号。

我不知道如何处理未找到符号的错误。如果这很重要,我不会以管理员/root 身份运行。这是在 Mac 上,10.4.11 我的谷歌搜索出现了一些提示,如果调用 gcc 而不是 g++,可能会发生这种情况,但我相信设置正确。

还有什么可能,我该如何解决?

以下是运行 make test 的摘录:

0 投票
1 回答
838 浏览

perl - 集成 Perl 和 Oracle 高级队列

有没有办法使用 Perl 进程作为侦听器来侦听 Oracle AQ。

0 投票
3 回答
6543 浏览

perl - Perl 中是否有 n 叉树实现?

我正在编写一个 Perl 脚本并想使用一个 n 元树数据结构。

是否有一个很好的实现可以作为源代码(而不是 Perl 库的一部分)?

0 投票
7 回答
11166 浏览

perl - 在 Perl 5 中是否有一个优雅的 zip 可以将两个列表交错?

我最近在 Perl 5 中“需要”了一个 zip 函数(当时我正在考虑如何计算相对时间?),即一个函数,它采用两个列表并将它们“压缩”到一个列表中,将元素交错。

(伪)示例:

Haskell 在 Prelude 中有 zip,Perl 6 有一个内置的 zip 操作符,但是如何在 Perl 5 中以优雅的方式做到这一点?