foreach $char (@array) { push (@xor_array, ($char ^ (shift @crypt_array))); }