# # # # # # # # #
# /9/brainfuck_golf_137.rb
#
# by Jan Lelis
# e-mail: mail@janlelis.de
# type/version: ruby 1.8
# snippet url: http://rbJL.net/9/brainfuck_golf_137.rb
# original post: http://rbJL.net/9-ruby-brainfuck-golf-update
# license: CC-BY-SA (DE)
#
# (c) 2009 Jan Lelis.
b=[a=0]*$$
gets'!'
eval split('').map{|z|%w{b[a]+=1 (b[a]=getc)<11&&1/0 b[a]-=1 putc(b[a]) 9 ( a-=1 )while(b[a]!=0) a+=1}[z[0]%32%11]}*$/