我可以转换这个 Perl 脚本以使其从文件中读取吗？
我想使用 Perl 脚本获取特定数据列的中位数，我有一个脚本可以读取脚本内数组中的值。 my (@vals, $med); @vals =(12, 23, 34, 21, 66,66, 34, 87); p…
调试 perl 脚本 - 变量插值
尝试调试这个脚本。我认为这可能是变量插值的问题？我不知道。 如果我传递这样的值，它可以使用选项： perl test-file-exists.pl --file /proj/Output…
使用 Perl 提取单词
我喜欢从文本中提取单词。我写了简单的正则表达式。 my $regex = qr[\W]; while(){ push @words, split $regex; } 我喜欢修改它以包含专有名称。专有…
VACUUM 是否在数据库目录之外执行 I/O 操作？
对于通过 Perl 程序访问的 SQLite 数据库，我可以使用 INSERT 和 DELETE 命令，但不能使用 VACUUM，这会引发： 磁盘I/O错误 如果我以 root 身份运行该…
如何可靠地获取IP地址的出站掩码？
如何快速可靠地屏蔽我的传出 IP 以执行许多 Web 请求？ Tor 太慢了。需要 10 倍的时间。 Tor 隧道对我来说根本不起作用http://www.thoughtcrime.org/s…
unix 或 perl 一个衬垫可以同时拖尾多个文件
有人可以帮我想出一个快速的 unix 或 perl one liner 来同时跟踪 Xn 条日志吗？ 我只需要在标准输出上快速查看 2 个或更多日志，足够的行可以在我的屏…
Perl/CGI 表单检查
这是我第一次尝试 CGI（我懂一些 Perl），但我摔倒了。 我想输入一个表单并检查它 - 但检查部分根本看不到提交的值。 我直接作为 http://example/cgi-…
如何在 bash 包装器中调试 perl
我正在调试由 bash 脚本启动的 Perl 程序。因为Perl脚本由大量的Perl模块组成，需要提供极其复杂的选项，所以这里的bash包装器肯定是必要的。 由于这…
使用 Perl 提取字符串中的匹配项数
如何找出该字符串中的磁盘数量？ $str='disk 0_1 0_2 0_3'; 在这个$str中，磁盘的数量是3。Perl 如何输出这个字符串中有多少个磁盘呢？ 谢谢你！…
有没有更好的方法在 Perl 中添加/删除字符串中的“B”？
有很多行文本， 有些行具有以下模式 /^aaa(B+)(.*)/ 以“aaa”开头， 后跟多个“B”（1 到 9）， 其余部分该行 需要构造一个函数，得到什么： 标量中…
无法运行 Fork，分叉了不需要的进程数
我在 Perl 中使用 Fork 时遇到问题。我想从一个脚本一次性执行 10 个分叉进程，所有 10 个子（分叉）进程都会执行相同的操作（将文件从一个位置复制到…
XML::LibXML::Reader 给出错误的匹配元素
这是我使用 XML::LibXML::Reader 解析的 XML . ，这是代码 use XML::LibXML::Reader; my $reader = XML::LibXML::Reader->new(location => "map.xml")…
获取 DNA 子串的原始顺序
我想获取长DNA序列的子串 例如，给定： 1/ATXGAAATTXXGGAAGGGGTGG 2/AATXGAAGGAAGGAAGGGGATATTX 3/AAAAAATTXXGGAAGGGGXTTTA 4/AAAATTXXATAXXGGAAGGGGX…
Mojolicious 通配符占位符和问号
通配符占位符 (*) 据说可以匹配所有内容。 但我担心它不会... 我有一个具有以下方法的网络服务： get '/*param' => sub { my $self = shift; my $para…
Perl + Ajax - 通过 HTML 模拟命令行？
是否有可能（或者，我认为，实用）使用 Perl 和 Ajax 来创建类似于使用 HTML 的命令行界面的东西？ 本质上，我希望在我的网页上有一个空间，用户可以…
