$iが数字じゃないときにエラーを出す
っていう処理をしたいんだが

if ($i =~ /\D/){
print "error\n";
}


とすると$iが3.5などの時もエラーになってしまいます
どうすれば$iがAやあ、1aなどの時だけエラーが出るようになりますか
教えてください