sub is_integer { ~$_[0] !~ /\D/ }