导入/要求/使用 perl 模块
我有 2 个 perl 文件，它们相互依赖。 第一个文件 A 是一个 .pl 文件，其中声明了多个包/模块。 第二个文件 B 将尝试访问文件 A 中声明的众多包之一。…
如何动态调用对象的方法？
在 Perl 中，我知道您可以使用 eval 和 *{$func_name} 动态调用函数，但是如何使用对象的方法来执行此操作？ 例如 EZBakeOven sub make_Cake { ... } …
bash 彩色文本和管道
我有一个 Perl 脚本，可以在 bash 下输出一些彩色文本。例如，这将输出一个红色字符串： perl -e 'print "\e[1;31m RED \e[m" 当我通过管道将其传输到…
为什么 Moose make_immutable 杀死这个脚本？
package testDB; use Moose; use Carp; use SQL::Library; has 'lib' => (#FOLDBEG is => 'rw', isa => 'Str', default => 'default', trigger => \&_…
使用 Perl 的 File::Copy 重命名文件扩展名
如何使用 File::Copy 重命名文件扩展名？ 到目前为止，我可以添加一个扩展。我需要替换文件扩展名。 例子： myfilename.txt 到 myfilename.dat 我的代…
CGI：可以将大量单选按钮组值收集到一个数组中吗？
我正在做一个 Perl/CGI 表单，需要向用户呈现可变数量（1 - 100 或更多）是/否单选按钮组。有没有办法必须创建一个单独的变量来保存每个值 $radio1 = …
有没有一种巧妙的方法将 Perl 哈希序列化为 HTML 查询字符串
我有一个使用 CGI 的 perl 脚本。 浏览器用一些参数调用它。 我想获取这些参数，修改其中一些参数，然后发回带有表示修改后的参数的新查询字符串的重…
将文本替换为前置字符串和后置字符串
我有一个文件，其中有一些具有公共字符串的行： _report_file << 所以上面的文本可以是任何东西，但它以分号（;）结尾 例如，请参见下面的行： CACUP_…
perl 正则表达式通过关键字查找 Java StackTrace
我需要通过关键字从日志文件中 grep 完整的堆栈跟踪。 此代码工作正常，但在大文件上速度较慢（文件越多，速度越慢）。 我认为改进正则表达式来查找关…
如何使用 Perl 正则表达式从 HTML 文件中提取信息？
我有两个文件，XML 和 HTML，需要从这些文件中提取某些模式的数据。 我的 XML 文件格式非常好，我可以使用 readline 读取一行并在标签之间搜索数据。 …
我怎样才能捕获“无法解码 JSON”的错误？ Perl 中的错误消息？
因此，我尝试加载测试返回 JSON 值的 REST API。 为此，我创建了 perl 脚本的多个实例。 Perl 脚本基本上会调用该 URL，并尝试decode_json。显然，当…
start_form 的默认操作变量
我目前正在编写自己的网络服务器来处理 cgi 脚本。在我当前的测试 perl 脚本中，我有一小段代码， print start_html("CGI Test Page"), h1("CGI Test …
