Làm cách nào để kiểm tra vô hướng cho giá trị 'inf' trong Perl?

Question

thể trùng lặp:
How do I create or test for NaN or infinity in Perl?

Làm thế nào tôi có thể kiểm tra, nếu vô hướng giữ inf giá trị?

Tôi kiểm tra NaN là $scalar != $scalar, phải làm gì với inf?

$scalar == inf không làm việc, kể từ inf là một bareword

Answer 1

Tôi tìm thấy một bẩn hack ngay bây giờ.

($scalar eq "inf") 

Có trình dọn dẹp nào tồn tại không?

Answer 2

bạn có thể sử dụng để kiểm tra vô cực:

$scalar < 9**9**9 

đó liên tục là rất lớn mà nó sẽ được hiểu là vô hạn bởi Perl