问题标签 [perlscript]

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.

0 投票
1 回答
946 浏览

arrays - Perl 如何将数组作为参数传递给另一个 Perl 脚本

我有 2 个 perl 脚本,通过将数组作为参数传递primary_script.pl来调用脚本。secondary_script.pl

我的代码如下所示:
primary_script.pl


次要脚本.pl

我将数组引用作为参数传递到secondary_script.pl那里并从那里取消引用该数组。这里@var打印0结果而不是传递的数组内容primary_script.pl

这是将数组作为参数传递给另一个 perl 脚本的正确方法吗?

0 投票
1 回答
327 浏览

oracle - 如何在perl中检查先前执行的命令的状态

我对 Perl 完全陌生。我有一个 Perl 脚本,它检查与容器中运行的 oracle 数据库的连接。这是我的代码

使用这个脚本,我可以连接 oracle database 。但是这个脚本没有向我的终端提供任何状态输出。如何检查脚本是否连接到数据库?我知道 bash 有 $?用于检查先前执行的 cmd 的状态。我们在 Perl 中有类似的东西吗?

这是我想要的输出“成功连接到 Oracle-db”,当连接正常时,当脚本无法连接到数据库时,状态为失败

注意:此代码向我的终端提供错误状态。我的 Perl 版本是 v5.16.3

0 投票
1 回答
173 浏览

oracle - 如何在 Perl 脚本中访问 shell 环境变量

我有的

我有一个检查与 oracle 数据库的连接的 Perl 脚本。这是我的代码

我已经导出了 ORACLE_SIDexport ORACLE_SID=ORCLCDB 这段代码的输出是

似乎 ORACLE_SID 被 Perl 拾取,但未在 sid=$ORACLE_SID 中使用。为什么打印功能可以使用 $ORACLE_SID 而 sid=$ORACLE_SID 无法获取值

0 投票
1 回答
45 浏览

docker - 在以 root 身份在 docker 容器内执行的 perl 脚本中获取当前真实用户

我想在 docker 容器中以 root 身份执行 perl 脚本(主机上的 SUDO),并在 perl 脚本中获取真实的用户 ID。

例如,下面的执行应该使 myscript.pl 能够获取真实的 userId(在这种情况下为 mat),而不必将其作为附加参数显式传递给 myscript.pl..(从主机调用时容器内的脚本应该找到调用脚本的真实用户)

排除在容器启动期间设置为 docker 环境变量,因为

  1. 该脚本将由任何用户执行,我需要获取该用户的真实 ID。
  2. docker 容器是使用 Init 服务启动的……所以从技术上讲,这意味着也不可能设置任何用户详细信息……

还..

我不想让脚本的用户通过他们的 userId 来打扰他们(这可能看起来是多余的,如果提供了这样的选项,他们也可以传递任何 Id..)

请让我知道是否有人遇到过这样的问题并解决了?

0 投票
0 回答
160 浏览

windows - 使用活动状态 perl 5.26 从 perl 脚本生成 exe 文件

我想在 Windows 10 中使用 Active state perl 5.26 将我的 perl 脚本转换为 .exe。

我尝试搜索它,但找到了旧版本。

我找不到活动 perl 5.26 的 Par::paker。5.26 不支持 pp 吗?Windows 10 上 5.26 的 pp 的替代方案是什么

0 投票
2 回答
136 浏览

bash - 如何从 bash 脚本中获取 perl 退出值

我正在尝试通过 bash 运行 perl 脚本,并获取 perl 的退出值。

perl_script.pl

bash.sh

“$?” 无论退出值是什么,变量都保持返回 0。你知道另一种从 bash 中检索 perl 退出值的方法吗?

提前致谢!

0 投票
1 回答
403 浏览

oracle - 通过 perl 脚本调用 oracle 存储过程

有人可以帮我告诉我如何在 Perl 脚本中调用 oracle 子例程

我在 oracle db 中已经存在一个过程。下面说

案例 1) 返回一个引用游标并接受一个 IN 参数。

在 SQL 开发人员中,我可以直接执行它:

有人能告诉我如何通过 Perl 脚本调用带有参数的子例程吗

安瑟

我不确定准备声明。任何帮助都是非常可观的。

0 投票
1 回答
126 浏览

r - 合并列,但它进入 perl 代码中的新行

我对 Perl 代码很陌生,我正在将一些数据集与以下代码合并。数据设置如下:第一行指定样本名称,然后是第二、第三列的计数......第一列指定基因名称。我有 2 个要合并在一起的大数据集,我一直在使用以下 Perl 脚本,方法是指定 perl 脚本的路径,并在终端中运行以下代码:

Perl 脚本如下:

使用上面的代码,我应该得到一个合并表,删除重复的行,第二个文本文件的(样本 A 到样本 Z)列合并到第一个文本文件的列(样本 1 到样本 100),所以它应该看起来像这样,由制表符分隔。

当我的合并文件返回合并两个数据集时出现问题,但是下一行而不是同一行中的第二个数据集。它将识别、排序和合并计数,但会进入下一行。我的代码或输入有问题吗?

感谢您的所有帮助!

0 投票
2 回答
91 浏览

regex - 使用 perl 脚本从字符串中删除特殊字符

我有一个如下的字符串

我想得到像

spl 字符 ééééô 并且@必须被删除。

我正在使用

我得到了类似的结果, Sweééééôdenééééô没有被删除。

你能建议我补充什么吗

0 投票
0 回答
26 浏览

bash - 如何处理从 app_credentials 传递的保留 bash 字符

我正在尝试将 app_credential 从机密管理器获取到 terraform。

秘密经理:

数据.tf

豆荚文件

码头入口点.sh

结果:

该值abcd$$efgh被返回为abcd$efgh

我该如何处理以返回正确的值或有任何解决方法?

我正在使用 terraform 版本 0.11.14