in reply to An Useless Cipher
for $j ( 0 .. $#bits ) { $bits[$j] =~ s/1/x/; $bits[$j] =~ s/0/1/; $bits[$j] =~ s/x/0/; } [download]
Or simply:
tr/01/10/ for @bits; [download]
www.com | www.net | www.org
No recent polls found
