问题标签 [perl-module]
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.
regex - 从相对 URL 确定完整 URL 的最快方法是什么(给定基本 URL)
我目前正在使用该模块URI::URL
从相对 URL 生成完整 URL;但是,它的运行速度并没有我希望的那么快。有谁知道另一种可能更快的方法?
perl - 我应该使用哪个框架来编写模块?
编写模块的最佳框架是什么—— ExtUtils::MakeMaker (h2xs) 或Module::Build?
windows - 如何在 Windows 上更新 Perl 而不会丢失模块?
在工作中,我在 Windows 上使用 Perl 5.8.0。
当我第一次安装 Perl 时,我去了 CPAN,下载了所有源代码,做了一些更改(在 .MAK 文件(?)中以支持线程,或类似的东西),然后nmake
/ nmake test
/ nmake install
。然后,一点一点地,我从 CPAN 下载了各个模块并完成了 nmake 舞蹈。
所以,我想升级到更新的版本,但新版本不能破坏任何现有的脚本。值得注意的是,我安装的一堆“使用”模块必须安装在新版本中。
更新我当前版本的最可靠(也是最简单)的方法是什么,以确保我对 nmake 舞蹈所做的一切在更新后仍然存在?
perl - 我应该将我的实用程序.pl 更改为实用程序.pm 模块吗?
在我们的产品中,我们有一个很大的实用程序文件,我们do
在很多文件的开头都需要(带有 )。有没有理由不把它变成一个模块?例如,不要这样做:
我不能这样做吗?:
perl - 如何在 Perl 模块中创建私有函数?
我正在开发一个小的 Perl 模块,由于某种原因,我让使用我的新模块的测试驱动程序脚本调用了我认为是私有的函数之一,并且它成功了。我很惊讶,所以我开始搜索谷歌,我真的找不到任何关于如何在 Perl 模块中创建私有函数的文档......
我看到一个地方说在你的“私人”函数的右大括号后面放一个分号,像这样:
我试过了,但我的驱动程序脚本仍然可以访问我想要私有的功能。
我将编写一个更简短的示例,但这就是我所追求的:
模块 TestPrivate.pm:
驱动程序:TestPrivateDriver.pl
驱动器输出:
所以我在模块的最后一个右大括号后加了一个分号,但输出还是一样的。我真正发现的唯一一件事就是将此行作为第一行添加到我的 private_function 中:
但这似乎很hacky。我没有很多编写 Perl 模块的经验,所以也许我的模块设置不正确?perl 模块中是否可以有私有函数和变量?
谢谢你帮助我学习!
perl - 如果我要在 Perl 中使用纯 OO,是否需要 Exporter?
文档(Exporter 和 perlmodlib)说:
作为一般规则,如果模块尝试面向对象,则不导出任何内容。
但是 perlmodlib 也说:
标准的捆绑模块都应该在命名空间污染方面以明确定义的方式运行,因为它们使用 Exporter 模块。
所以我想知道,如果你去OO并且什么都不导出,你真的需要Exporter吗?如果你不这样做,这是否意味着没有一个标准模块在这个意义上是严格的面向对象的,或者这是否意味着它们EXPORT_OK
有些东西,因为如果有人想从你的模块继承,你需要这样做?(这是真的吗?)或者您是否需要 Exporter 才能做到use MyModule; ... = new MyModule
?
perl - 如何在不重新启动的情况下调试 mod_perl2 模块?
环境:Apache/2.2.11 (Win32) mod_apreq2-20051231/2.6.2-dev mod_perl/2.0.4-dev Perl/v5.10.0
情况与此讨论列表帖子中描述的情况非常相似,除了在 win32 上。
我在 httpd.conf 中有这个:
...以及只有 mod-perl 脚本处理。
我有一个使用 MyPackage 模块的脚本,它正在工作。
我破坏了模块,然后重新加载脚本。这个错误很有帮助,告诉我在哪里破坏了模块。
(如果此时我再次重新加载,它只告诉我“未定义的子例程 &ModPerl::ROOT::ModPerl::Registry...”,因为它第一次无法加载文件。但无论哪种方式如下行为仍然发生。)
我恢复了中断,并触摸了脚本文件,这样它就会重新加载模块,然后重新加载。现在它说:
即使我触摸了脚本和模块,我也无法正确地重新加载它,除非重新启动 Web 服务器。
仅破坏脚本本身(而不是模块)可以正常工作:适当的错误并将其改回会导致它在重新加载时再次工作。
在完成这些事情之后,我在测试之前重新启动了 Web 服务器:
我尝试进行跟踪,但它继续出错的行是 ModPerl/RegistryCooker.pm 第 204 行,这只是 eval{} 整个脚本的行。
我尝试在脚本和模块中将“使用警告 FATAL => 'all'”更改为“使用警告”。没有什么不同。
我试过禁用我的自定义 $SIG{__DIE__} 功能。没有什么不同。(好吧,当然,只是在出现错误的地方,但产生的错误是一样的。)
根据开头的讨论链接,发现 MaxRequestsPerChild 一直为 0,我尝试了 ThreadsPerChild 1,但没有区别。我尝试将 MaxRequestsPerChild 设置为 1,这解决了这个问题的奇怪行为,但在每次请求后重新启动 Web 服务器:
这不是一个好的解决方案,因为我有大量代码在第一次点击页面时运行。
同样根据讨论,我将 httpd 作为服务运行,所以我在服务参数窗口中添加了 -X 并点击开始,它仍然试图在整整三分钟后启动(通常在 3 秒内启动。)甚至超时信息。通过任务管理器终止进程并验证我无法从 Web 浏览器访问该页面。从命令行启动 httpd -X。仍然与此问题顶部的行为相同。我还发现运行 httpd -? 时没有列出 -X 很奇怪。也许它在 win32 MPM 上不可用?
在该线程中,大卫指出:
我对此类问题进行故障排除的经验表明,被卸载的包可能删除了存储在重新加载的模块的包空间中的值(可能在 BEGIN 块时间设置),随后的要求没有恢复。
但这不适用于我的代码。我介绍的“破坏脚本”错误只是在已经存在的行之上添加了一个额外的“我的 $var”行,这样第二个就会抱怨它已经被声明了。
在每次重新加载后(无论是自动,通过 MaxRequestsPerChild,还是像以前一样手动)都没有重新启动 Web 服务器,就没有办法处理 mod_perl2 模块吗?
perl - 如何在 Perl 脚本中包含所有/部分“子模块”?
我首先要说我在创建 Perl 模块方面一点经验都没有,所以如果我离开这里,我很抱歉。
假设我正在创建一些模块:
因为我不知道它们叫什么,所以我将 a.pm 和 b.pm 模块称为“子模块”,因为它们与 bar.pm 模块相关,但仍然可能有些独立。
所以我的一个 Perl 脚本可以使用 foo::bar::a,另一个脚本可以使用 foo::bar::b,也许我还有另一个脚本需要使用“a”和“b”中的函数。而不是这样说:
我想做这样的事情:
在我看来,这将使我的脚本可以访问 bar.pm、a.pm 和 b.pm 中的所有内容。
我测试了这样的东西,我显然错了。
这样的事情可能吗?我想我可以让 bar.pm 使用 a.pm 和 b.pm,然后使用“包装器”函数将调用传递给“子模块”,但似乎会有更简单的方法。
perl - 发现 Perl 模块所有子例程的最佳方法是什么?
以编程方式发现 perl 模块具有的所有子例程的最佳方法是什么?这可以是一个模块、一个类(没有@EXPORT)或任何介于两者之间的东西。
编辑:下面的所有方法看起来都可以工作。我可能会在生产中使用 Class::Sniff 或 Class::Inspector。但是,Leon 的答案被标记为“已接受”,因为它回答了所提出的问题,即使no strict 'refs'
必须使用。:-) Class::Sniff 可能是一个不错的选择。看起来已经有很多想法了。
perl - 如何从命令行检查我的系统上是否安装了 Perl 模块?
我试图检查我的系统中是否安装了 XML::Simple。
上面的一行用于列出我系统中安装的所有模块。但是,它没有列出 XML 模块。
但是,以下执行正常。
可能是什么问题?