如何在Perl中检查标量中的'inf'值?

Kar*_*lek 5 perl infinity

可能重复:
如何在Perl中创建或测试NaN或无穷大?

如果标量保持inf值,我该如何检查?

我检查NaN $scalar != $scalar,该怎么办inf

$scalar == inf不起作用,因为inf是一个赤字

Kar*_*lek -1

我现在发现了一个肮脏的黑客。

($scalar eq "inf")
Run Code Online (Sandbox Code Playgroud)

有更干净的东西存在吗?