如何从文本文件读取算术数据并处理Perl中的操作

Question

I have a text(example.txt) file which has numbers and arithmetic operations eg
10+5*6
8+(4*3)
...
I want to handle these operations and generate output like below in another text file (output.txt)
10 + 5 * 6 = 40
8 + (4 * 3) = 20
...
I'm new to perl, so your help would be appreciated.

Answer 1

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

perldoc Safe-在受限的隔离专区中编译和执行代码

Answer 2

这忽略了任何安全问题

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