sub is_numeric {defined getnum $_ [0]}