时间戳

首页 > 解决方案 > 在 perl 脚本中捕获 bash 输出值

bash - 在 perl 脚本中捕获 bash 输出值

问题描述

我有一个 bash 脚本，它将两个变量设置为值（不是 STDOUT）。我想将这些变量存储在 perl 脚本中。

抱歉没有例子..但这是要求。请有任何想法

在shell脚本中我正在做这样的事情

source <Script Name> <Variable1> <Variable2>
Value1=$output1
Value2=$output2

=====================我想在perl里面做同样的事情

试过了

system("sh <Script> <Variable1> <Variable2>");
$Value1 = "$output1";
$Value2 = "$output2";
print $Value1

变得空白

标签： bashperl

解决方案

为了建立@Snorik 的答案，您可以使用以下一种方法：

system 'bash', '-c', 'source xyz.sh; echo -n $output1 >1.txt; echo -n $output2 >2.txt';
my $output1 = `cat 1.txt`;
my $output2 = `cat 2.txt`;

推荐阅读