基于字符串输入从文件中读取

[英]Reading from a File Based on a String Input

我正在编写一个当前在 Perl 中的程序，我想要它做的是接受用户的输入（在我的例子中是一个字符串），读取一个文件，在文件中找到一个包含该输入的条目，然后打印。 到目前为止，这是我在这个特定子例程中所拥有的，其中这段代码是： 当我这样做时，它给了我这个： 我在我的极限。 我觉得我真的已经尝试了我在谷歌 ...

无法执行包含 perl 括号的 ssh 命令：“意外标记 `(' 附近的语法错误”

[英]Unable to execute ssh command containing parentheses with perl: "syntax error near unexpected token `('"

如果我从命令行运行此命令，它将在远程服务器上按预期工作： ssh admin@example.com "docker exec -it -d tasks_live_work_ec2_test_server /bin/sh -c \"/usr/bin/nvim -c 'silent! call Se ...

为什么 Perl 中的变量不遵守 `package` 语句？

[英]Why does a variable in Perl not respect a `package` statement?

考虑以下 Perl 代码：use strict; use warnings; use feature qw(say); package A; our $x = 1; package B; our $x = 2; package A; say $x; package B; say $x; ...

使用Perl软件从XML /文本文件中提取数据

[英]Extracting data from XML / Text file using Perl software

我需要你的帮助来学习 xml/text 格式文件的提取，我的 xml/txt 文件包含如下所述的大量数据格式。 我需要 output 格式，例如 Email,firstName,lastname,affiliation 并且 output 应该导出到文本文件。 通过使用 Perl 软件，我开发了下面 ...

Perl：存储完整文件内容而不是每一行的文件句柄

[英]Perl: Filehandle storing the full file content and not each line

文件“/serrs/env.txt”的内容是： 代码片段是： Output： 我想要的（预期）： 为什么 $_ 在第二个打开 ( open(FH3, '<', "/serrs/env.txt" ) 存储文件的全部内容，即使 output 记录运算符在第一个打开 ( open(FH2, '&l ...

在 MongoDB 中搜索一个日期早于另一个日期的记录

[英]Searching MongoDB for records where one date is older than the other

我在 MongoDB 中有以下示例记录。 我试图返回数据库中“dupdated”小于“lastmod”的所有记录。 我正在使用 perl。 这是对“$gt”有效但对“$lt”超时的代码 我有 2 个索引。 索引 1 索引 2 由于某种原因，我似乎无法让更新的 lt lastmod 快速运行。 任何见 ...

使用 Perl 解析数据

[英]Parsing data using Perl

我无法正确解析 xml 数据。 我需要你的帮助。 此代码应从数据中提取 lastName firstName 和从属关系，并应保存在文本文件中。 我试过上面的代码，但我无法在 output 中获取 firstName。我请求你通过更正代码来帮助我。 先感谢您。 ...

perl oneliner 在同一打印语句中打印数组和其他匹配项

[英]perl oneliner print the array and other match in same print statement

我有一组包含示例数据的文件，如下所示，我需要转换数据以将-o之后的所有目标文件放在第一列中，并在-l之后将链接库放在第二列中。 这种格式在整个 make 输出中是一致的。 我正在尝试将其解析为更简单的格式以供进一步处理： 我正在尝试这个，显然这不是我想要得到的： 在这里，我试图将所有对象存储到$1和 ...

Perl 版本变化？

[英]Perl version changes?

20 年前我写了一些 perl cgis。 他们工作得很好……直到我的托管公司上周更新了我的机器。 一个 Perl cgi 块。 似乎是因为以下顺序： 不再被理解为“在同一目录中使用这三个脚本”。 哪个是正确的条目？ 我在重新加载、站点重组等方面尝试了很多其他方法（该脚本由请求用户输入的 HTM ...

在 Perl 中隐藏与故意代码相关的警告

[英]Hiding Warnings that Relate to Intentional Code in Perl

当 Perl 解释我的代码时，我有几个像下面这样的警告出现了很多： 还有几个我覆盖了包含错误的 CPAN 模块子例程的地方： 这些都是代码中有意的事情。 我发现 Smartmatch 是一个很棒的工具，我有意使用它没有任何问题，我特别覆盖了那些子例程，因为它们在上游模块中无法正常运行。 是否有一种“ ...

我尝试安装的 Yum 依赖项没有提供程序

[英]Yum dependency I'm trying to install doesn't have a provider

我尝试安装的 rlwrap 包的依赖项之一没有提供程序。 有没有我可以传递给安装程序的命令行选项，让它忘记 perl(File::Slurp) 依赖项？ 我已经单独安装了 perl(File::Slurp) 依赖项。 作为参考，这是我用来安装 rlwrap 包和错误的命令： 我已经尝试了 yum 输 ...

DNF 安装找不到 Perl 依赖项，有办法弄清楚正在使用哪个@INC？

[英]DNF install cannot find Perl dependencies, there is a way to figure out which @INC is being used?

我正在为 EOL MongoDB Perl 驱动程序安装自定义 rpm； RPM 构建运行良好（我使用的是 fpm）：fpm -t rpm -s cpan --maintainer 'Jose Vicente Nunez <me@company.com>' BSON sudo dnf ...

system () rsync with variable path with spaces

[英]system () rsync with variable path with spaces

我需要将带空格的可变路径传递给 Perl 的system rsync命令。 我的脚本包含这些变量： 我需要将目标路径传递给rsync命令 rsync不喜欢带有空格的路径，所以我尝试以这种方式编写路径： rsync 接受它，但它将路径分成： 如何将带空格的路径传递给rsync？ ...

qq(<text> ） 和 ”<text> “在 Perl 中？</text></text>

[英]Is there a difference betwen qq(<text>) and "<text>" in Perl?

在 perl 中，您可以同时使用qq(&lt;text&gt;)和"&lt;text&gt;"来创建双引号文本。 两者之间有什么区别吗？ （同样的问题q(&lt;text&gt;)和'&lt;text&gt;' ） ...

哈希引用数组：如何根据哈希引用“列”值进行访问

[英]Array of Hashrefs: How to access based on hashref "column" values

我有一个使用 fethrow_hashref() 从数据库构建的哈希引用数组。 数据结构是这样构建的： 我按程序名称升序对查询中的数据进行排序，因此数组中的所有引用仍按字母顺序排列。 然后，我遍历每个散列并找到在数值上等于'1'值。 然后我获取 caolumn 名称，并将其存储以与具有该程序名称的其 ...

为什么 Hashref 传递给 Net::Ping 构造函数，在 Net::Ping-&gt;new($args) 之后设置为空 hashref？

[英]Why is the Hashref passed to the Net::Ping constructor, set to an empty hashref after Net::Ping->new($args)?

我在这里错过了什么？ 当像这样向 Net::Ping 传递参数时，在初始化构造函数 Net::Ping-&gt;new($args) 之后，$args 和 $args_copy 都将被设置为一个空的 hashref。 我在运行带有 Perl v5.30.0 的 Ubuntu 20.04.4 LTS ...

Perl解析文件内容

[英]Perl parsing file content

我正在尝试解析包含 3 个类别的文本文件内容并在主代码中访问它。 我知道散列可能是一种好方法，但由于输入文件中没有列是唯一的（名称可能重复或不同），我怀疑是否有其他方法可以做到这一点。 感谢任何答复。 输入文件格式：（基本3列） ...

安装模块 Text::Unaccent 时出错

[英]error when installing module Text::Unaccent

尝试安装Text::Unaccent模块我有下一个错误，有人可以帮忙吗？C:/Strawberry/c/bin/../lib/gcc/x86_64-w64-mingw32/8.3.0/../../../../x86_64-w64-mingw32/bin/ld.exe: Unaccent.o:U ...

perl通过拆分内容将文本文件存储到变量中

[英]perl storing text file into variable by splitting content

我是 perl 脚本的新手，必须维护某人的脚本。 有一个子程序来解析配置文件内容（标准格式为三列）。 $info{$name}{$b}{address}=$address这行是做什么用的？ 它是哈希吗？ 如何访问主代码中的解析内容？ 比如foreach name ，得到son's name和add ...

如何匹配2个数组？ | Perl

[英]How to matching 2 array? | Perl

我有 2 个文件需要匹配。 File1.txt包含： File2.txt包含： File1将在此keyword &gt;WORDS&gt;之后与File2进行单词匹配。 意思是File1和File2只是比较单词“Other than that?” 和“你想什么时候吃午饭？”。 因此结果将在k ...