如何从文本文件中读取算术数据并在 perl 中处理操作答案

【问题标题】：how to read arithmetic data from text file and handle operations in perl如何从文本文件中读取算术数据并在 perl 中处理操作
【发布时间】：2014-01-13 22:01:52
【问题描述】：

我有一个文本（example.txt）文件，其中包含数字和算术运算，例如
10+5*6
8+(4*3)
...
我想处理这些操作并在另一个文本文件 (output.txt) 中生成如下所示的输出
10 + 5 * 6 = 40
8 + (4 * 3) = 20
...
我是 perl 新手，非常感谢您的帮助。

【问题讨论】：

标签： regex perl text-files arithmetic-expressions

【解决方案1】：

perl -MSafe -lnE 'say "$_ = ", Safe->new()->reval($_) //"failed"' example.txt

perldoc Safe - 在受限隔间中编译和执行代码

【讨论】：

【解决方案2】：

这忽略了任何安全问题

perl -ln -e '$a=eval; print "$_ = $a";' < examples.txt

【讨论】：