print @a;; 1 1 0 0 1 1 0 0 0 0 0 1 1 1 0 0 $_ ^= 1 for @a;; print @a;; 0 0 1 1 0 0 1 1 1 1 1 0 0 0 1 1