return 1 unless($_[0]=~ y/0-9//c);
  return 0;