I wish to draw better ASCIIsh man :)
s
=-*-*-*-*-*-*=
--iIIi---------- ------------------ \
-///oo--- -------------- --------------------
||C^,,>--- --------------------- \
\.__-/__hack!------- --------------------
-\ _/------------ --------------- -------------------- \
-------- ----- ------------------
---------------- ----- ------------------ ------------
-------- - --- ----------- ----- ------------------
==>s y\S+y[q===>=>q=a=..q=z=]->[length($&)]yesg=>s]\s*]
{q= ==>q===>qq=\n==>q= =}->{$&}]ge
=>=>s=\S+==e=>eval$&