ExtUtil::MakeMaker 可以在“安装”时使用吗

[英]Can ExtUtil::MakeMaker upon 'make install'

我一直在玩 MakeMaker，它似乎可以做我需要的所有事情，除了一件事：在make install,我需要运行一个 shell 命令来注册安装到我的代码集成的工具中的模块之一的路径和： 其中“/path/to/”应该是 MakeMaker 打算安装其EXE_FILES参数中列出的脚本的位置。 这可 ...

如何在 Perl 脚本中检测管道上的文件结尾？

[英]How can I detect end of file on a pipe in a Perl script?

在 Perl 脚本中，我正在运行另一个进程 (openssl) 并通过管道与它通信。 我用IPC::Run::start运行 openssl。 我使用$io_select_for_stdin->can_write(4)和syswrite将明文数据写入 openssl。 我使用$io_sele ...

使用 perl 及其各自的人添加分数

[英]Add the scores using perl with its respective person

我有一个文件，其中包含许多人及其分数的数据。 我正在尝试对每个人的分数进行平均。 预期产出 我尝试了什么： 在这一点之后，我无法将值存储在数组中以供进一步计算。 ...

如何在使用 Text::SimpleTable 绘制的每次迭代中清空 $table

[英]How to empty the $table every iteration drawn using Text::SimpleTable

我需要打印表格，但在第一次迭代后它正在追加。 每次迭代后如何清空表格？ 我得到的输出： 第一次迭代后的预期： 预期的第二次迭代： ...

仅当包含 2 个特定字符串时才 Grep 行

[英]Grep lines only if containing 2 specific strings

仅当其中包含 2 个特定字符串时才可以grep行吗？ 我有这样的日志，我只想 grep 包含字符串“13/Dec/2022:11”和“GET /fr/test”的行 ...

需要帮助理解 perl 包中的完全限定名称

[英]Need help understanding fully qualified names in perl packages

我是Pythonizer的作者，我正在尝试从CGI.pm了解更多代码，具体来说： 我需要知道的是$MultipartBuffer::INITIAL_FILLUNIT和$INITIAL_FILLUNIT的完全限定名称，因为在我的解释中它们应该都是$CGI::MultipartBuffer::INITI ...

将json数据转换为cp1251编码

[英]Convert json data in cp1251 encoding

我在 cp1251 中处理来自 Web 表单的数据； 我需要将带有数据的哈希值转换为 JSON 当我用 我需要在不转换的情况下制作 JSON 字符串。 在这种情况下有助于这样的事情： 要么 还有哪些正确的选择可以解决问题？ ...

有什么方法可以在 Perl 中获取 ssl 证书的到期日期？

[英]Is there any method for getting expiry date of ssl certificate in Perl?

我使用 LWP::UserAgent, Date::Parse,Net::SSLeay qw(get_https3) 作为 ssl 证书的到期日期，它给了我 3 个日期，其中 1 个是正确的我尝试了这种获取日期的方法，但它给了我 3 个日期，其中一个是正确的，而对于其他日期，它给出了错误的日期总数 ...

cpan 失败，因为它无法验证 cpan.org 的 SSL 证书

[英]cpan fails because it can't verify cpan.org's SSL certificate

我将 perl 从 perl 5.18.2 升级到 perl 5.36.0，现在很多模块都不见了。 当我尝试使用 CPAN 安装模块时，出现错误。 例如： 它给了我以下错误： 我尝试通过以下方式解决错误： 和 但没有一个对我有用。 现在，我该怎么办，因此我无法继续进行。 ...

LWP::UserAgent 在大文件 PUT 期间内存使用问题

[英]LWP::UserAgent Issue with Memory Usage During Large File PUT

我一直在尝试使用 LWP（或依赖于 LWP 的 Web 服务 API）传输大文件并遇到问题，无论我如何处理它， 该过程都会在某个点崩溃。 一时兴起，我在脚本运行时观看了top并注意到在事情开始失败之前内存使用量激增至超过 40GB。 我认为问题是我最初使用的 S3 API，所以我决定自己使用 LWP ...

如何在 Perl 命令中扩展 shell 变量

[英]How to expand a shell variable in a Perl command

我想用 shell 变量替换字符串。 期望是file="20221215" 。 但它失败了，结果是file="" 。 如何逃脱这种情况？ ...

$^S 在 perl 中是什么意思？

[英]what does $^S mean in perl?

$^S在perl中是什么意思？ 查看https://perldoc.perl.org/perlvar我能找到的是甚至不得不考虑异常处理程序中的 $^S 变量是完全错误的。 ...

无法对未定义的值调用方法“isBinary”

[英]Can't call method 'isBinary' on an undefined value

我正在尝试为 Perl 制作一个更小巧、更优化的 CGI 模块。 在处理init子例程以获取或设置默认文件数据时，我遇到了一个主要由MIME::Types模块引起的问题。 实际上，我的 init 子例程应该new的构造函数中获取 blessed 变量，初始化MIME::Types ，使用MIME: ...

从 perl 脚本中获取 alpine linux 上的 zsh 上的“无法执行“命令””错误

[英]Getting `Can't exec "command"` error on zsh on alpine linux from inside a perl script

我有一个用于 taskwarrior 的task命令的 perl 包装器脚本，它在 macOS 上运行得很好。 我已经将它移植到运行 alpine 的 docker 容器中。 当我运行脚本时，我得到了这个奇怪的错误： 在我的 mac 上，它工作得很好，没有错误。 which command报告： ...

在 Perl 中，正则表达式中捕获组的数量是否有限制？

[英]In Perl, is there a limit to the number of capture groups in a Regular Expression?

正则表达式中捕获组的数量是否有限制？ 我曾经认为它是 9（$1...$9），但在 perlre 文档中没有找到任何东西来证实这一点。 事实上，下面的代码显示至少有 26 个。 注意这个问题： How many captured groups are supported by pcre2 subst ...

如何对 ASCII 十六进制字符串数组进行数字排序？

[英]How to sort an array of ASCII hex strings numerically?

我觉得这是一个简单的问题。 但我被困住了，老实说，我现在的想法是信息过载。 我也是 Perl 的新手，我仍在尝试探索它。 所以我有一个包含字符串的变量： 然后我通过拆分将其转换为数组： Output： 现在，我想按升序对这个数组进行排序。 这是我尝试过的： 预计 Output： 但 output ...

使用perl从目录中的多个文件中查找最后一次出现的字符串

[英]Find last occurrences of a string from multiple files in a directory using perl

在一个目录中有多个文件。 从所有文件中，我必须找到字符串的最后一次出现并将该行打印到 result.txt 文件中。 假设文件类似于 demo*.txt。 我必须找到的字符串是“FREQ”。 我试过的代码如下： 我已经尝试过这段代码，但这什么也没给，我无法找到我犯的错误。 ...

当使用 perl cgi 和 mysql 匹配状态时，如何在 id 和仅 id 之间显示？

[英]how to show in between ids and only id when status is matched by using perl cgi and mysql?

我刚开始使用 Perl CGI 和 MySQL 数据库以及 html 模板。 我有一张名为“reserve”的表和名为 Show.html 的模板。现在我正在显示最大 reserve_id。 但是，当 reserve_status 为 3 时，如何在 ids 和 only id 之间显示。 表数据 ...

Perl 的 Inline::Python 在 AlmaLinux 8 上导致奇怪的错误，但不是 CentOS 7

[英]Perl's Inline::Python Leads to Odd Error on AlmaLinux 8, but Not CentOS 7

我正在尝试使用Inline::Python直接访问 Perl 中不可用的 Braintree API。 它的代码已经在 CentOS 7 服务器上运行多年，但是当我试图将这段代码移动到新的 AlmaLinux 8 服务器时，我已经使用了六年的相同代码无法运行，立即失败当我尝试导入 Braintre ...

在 void 上下文中无用地使用 (/)

[英]Useless use of (/) in void context

当我尝试这段代码时： 它给了我： 在 p.pl 第 3 行的 void 上下文中无用地使用除法 (/)。 但是，经过一些尝试，它通过在表达式周围添加额外的外括号来工作，例如： 它确实奏效了！ 谁能解释为什么？ ...