$_.=($=+(6<<1));print(chr(my$a=$_));$^H=$_+$_;$_=$^H; print chr($_-39); # Easy but its ok. [download]
In reply to Re: Splitting A Word? by damian1301 in thread Splitting A Word? by mpegman