Sometime ago, some insane guy posted a lot of binary into a thread on a german news-forum. First I thougt it could be a kind of simple riddle so I tried to convert it to ASCII to see what it is, but it was just binary-polution. That's the conversion script:
#!/usr/bin/perl
use strict;
use warnings;
while(<DATA>) {
chomp;
my @cur = split(//, $_);
my $val = 0;
for (0..7) { $val += pop(@cur) * 2**$_; }
print $., "\t", $val, "\t", chr($val), "\n";
}
__DATA__
01101010
10010101
01010101
01011011
01001101
01101010
10011011
01010000