(while(#(when%(->% java.net.InetAddress/getByName .hashCode Integer/bitCount prn)1)(read-line)))