Perl难题：如何将字符串作为if语句的判断条件

saintbin

由于perl没有Boolean型变量，当用字符串做if语句的判断条件是，会根据字符串是否为空来得出是否为真的条件。只要字符串不为空，则永远为真。
问题就出在这里。

如果我希望通过读取文件中的一行作为if语句的判断条件，必须先把一行赋值给一个字符型变量。

如某行为： 3 > 1 and 5> 6
但将其赋值给某字符型变量后,如$condition,那么$condition = '3 > 1 and 5> 6';

则 ： if($condition) 中条件永远为真，因为作为字符串，其不为空。

而如果直接写为 ： if（3 > 1 and 5> 6）则条件为假。

我的问题是有没有办法，在if语句的条件判断部分出现字符串的时候，不根据字符串是否为空来判断真假呢？
可能这个问题描述的不清楚，请高手们指点一二，谢谢啦！！

本人没有积分，不能悬赏不好意思了。

saintbin

个人感觉似乎难度很大，甚至不可能实现，但还是非常期待奇迹出现。

flw

if( eval $condition )

不过是不安全的做法。

安全的做法可以到 CPAN 上找一些 parse，比如 yapp 什么的。或者简单的也可以自己分析。

saintbin

flw果然牛人，管用。谢谢！

weihua2007

if的条件用正则表达式

ttcn_cu

这个不是Perl的难题吧,难道你用C++能简单实现???

wfnh

肯定是eval
啦··