Help for this page
my $bin_str = unpack( "b*", $string ); print join( "\n", split( //, $bin_str ) );
unpack b = [10000110] 1 ... 1 1 0