Лучший способ избежать «isn 't numeric in numeric eq (==) ”- предупреждение

#!/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!";
} 

Как лучше всего избежать' Аргумент «f» не является числовым в числовом eq (==) при ./perl.pl строка 7.'- предупреждение?
Полагаю, в этом случае я мог бы использовать «eq» два раза, но это выглядит не очень хорошо.

7
задан sid_com 9 November 2010 в 08:50
поделиться