123 = 1111011 4 = 0000100 ^ #### print "Even\n" if ($x & 1) == 0;