asc2bin - dia dos namorados

#!/bin/bash

# asc2bin
#
# Conversão de stream texto para a sequência correspondente dos seus códigos ASCII em binário com 8bits cada.
#
# Arkanon <arkanon@lsd.org.br>
# 2015/06/12 (Sex) 12:24:17 BRS
#
# Uma singela contribuição nerd ao Dia dos Namorados

encode()
{
  cat /dev/stdin \
  | od -td1 \
  | grep -Eo "( [0-9]{2,3})+" | tr -d ' ' \
  | while read asc
  do
    printf %08d $(bc<<<"obase=2;$asc")
  done
}

bits=$(encode << EOT
      _
    _( )_
   (_(%)_)
    /(_)
__ |
\_\|
   |
   |
EOT
)

decode='while [ "$bits" ]; do echo -en \\x$(printf %x $(echo $((2#$(echo $bits|cut -c-8))))); bits=$(echo $bits|cut -c9-); done'

echo bits=$bits
echo $decode
eval $decode

# EOF