#!/usr/local/bin/perl # maxexor.pl # Used for making the xor japh # Copyright (C) 2000 Brock Wilcox # Licensed under the same terms as Perl itself eval('!#8?%sq$"%qz?>%94#qk4#=qs02:4#g?s' ^('a'x33)^((((('0'x6).'Z'.'0'x4).'Z'.'0' x7).'Z'.'0'x4).('Z'.'0'x5).'Z'.'0'x2));