C:\>perl -MScalar::Util=looks_like_number -e "print looks_like_number 'Inf'"
20