Re^3: Bad ascii art


Clear questions and runnable code get the best and fastest answer
	PerlMonks

Re^3: Bad ascii art

by muntfish (Chaplain)

on Aug 26, 2004 at 15:05 UTC ( [id://386045]=note: print w/replies, xml )

Need Help??

in reply to Re^2: Bad ascii art
in thread Bad ascii art

OK, it's the m?? that is upsetting it. White space is not being filtered. The following works - but I'm going to start again to find a more obscure way of generating the characters...

$==109;for(split//,q{
         /
      ++++++
  ++o-------=++   ++
++_--------------<+
  ++,+++++++++    +/
     --------     --
        -/
}){m^\s^?():s:-|\+:\$=$&$&:?eval:print chr($=)}
[download]

s^^unp(;75N=&9I<V@`ack(u,^;s|$.+\`|"$`$'\"$&\"$"|ee;/m.+h/&&print$&;