implementation

perl $22$byte

print`tee x`<`rev<x`|0

perlやawkで文字列をreverseするのは難しいらしい。 rubyにはあるけど整数との変換が遅い。 なのでほとんどbash。しかしexprするよりperlから呼んだ方が速かった。