perl - 避免在数值eq(==)中出现 "isn' t数值的最佳方法“-警告

Question

#!/usr/bin/env perl
use warnings;
use 5.12.2;

my $c = 'f'; # could be a number too

if ( $c eq 'd' || $c == 9 ) {
    say "Hello, world!";
} 

最好的方法是避免在./perl.pl第7行的数字eq(==)中“参数“f”不是数字”警告？
我想在这种情况下我可以使用两次“eq”，但这看起来并不好。

Answer 1

不知道为什么要避免该警告。警告告诉您程序中存在潜在问题。

如果要将数字与包含未知数据的字符串进行比较，则要么使用“eq”进行比较，要么以某种方式清理数据，以使您知道它看起来像一个数字。