Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/blackberry/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何比较两个变量。一个是perl变量,另一个是python变量_Python_Perl - Fatal编程技术网

如何比较两个变量。一个是perl变量,另一个是python变量

如何比较两个变量。一个是perl变量,另一个是python变量,python,perl,Python,Perl,我从perl子例程得到一个输出,从python函数得到另一个输出 我想比较这两个变量,这样我可以得出结论,两个输出是相同的 ex python函数 #!usr/bin/lib/python import os,sys def sub(a, b): e= a-b return e #calling function p = sub(9,2) print "value of P:%s" %p p的o/p值:7 perl子程序--- o/p我的工资:7 由于这是两种不

我从perl子例程得到一个输出,从python函数得到另一个输出

我想比较这两个变量,这样我可以得出结论,两个输出是相同的

ex python函数

#!usr/bin/lib/python
import os,sys
def sub(a, b):
   e= a-b
   return e

   #calling function
   p = sub(9,2)
   print "value of P:%s" %p
p的o/p值:7

perl子程序---

o/p我的工资:7


由于这是两种不同的语言,我在比较p值和平均值时遇到了问题。

从shell调用程序,去掉数字前的单词,然后比较它们:

python_result=$(python_prog)
perl_result=$(perl_prog)
perl_result
if [ "${python_result#*:}" = "${perl_result#*: }" ]
then echo They match
else echo No match
fi

到底是哪种语言在作为结束步骤进行比较?它可能是python或perl。一切都很好。我正在Windows系统中执行所有python和perl文件。那么如何比较呢?为什么不使用shell而不是
sed
<代码>python_结果=${python_结果#*:}好主意,老习惯…:)谢谢你的意见。我在windows机器上做所有的比较。请提供帮助。您可以让其中一个脚本调用另一个脚本,并将其输出捕获到变量中。例如,perl可以做
$python\u result=`python\u prog`。当我这样做时,它说的是“test1.pl上匿名子例程的非法声明”。test1.pl包含函数平均值。我在这里调用函数sub。你能举上面两个子程序的例子吗。
python_result=$(python_prog)
perl_result=$(perl_prog)
perl_result
if [ "${python_result#*:}" = "${perl_result#*: }" ]
then echo They match
else echo No match
fi