return eval { ! ref $x and $x == $x }; [download]
is a light weight way to fix that case.
In reply to Re^2: is_numeric by GrandFather in thread is_numeric by tlm