bitwise-AND-bitwise-XOR bitwise-AND-bitwise-XOR using Perl adding Perl file to bitwise-AND-bitwise-XOR