read*DATA,$_,13**+3;y #{}
{}{};s>[\s*]+>>g;$i=length;s/
(.{$i})(.)/$2$1/gx while$i--;eval;;
;for(q\just \.q)another),q)perl hacker)){
for(split$!){$_=$$h{$_}?do{$_=$$h{$_};;;;;;;y
<A-Za-z0-9+/>/ -_/&&unpack'u',chr(length()*.75+32
).$_}:$"x$];$w=(sort{$b<=>$a}map+length,split$\=$/)
[$]-$]];s/^(.*?)\s*$/sprintf'%-*s',$w,$1/egm;push@f,[
[split$\],$w]}for$x($?..-//+$]){push@{$x[$x]},@{$f[$_][
$?]}?pop@{$f[$_][$?]}:$"x$f[$_][//]for$?..$#f}$s.="@{+pop
@x}$/"while@x;$k=$g=chr(ord$^);for(split$\,$s){$s=$g;$$s=$_
;++$g}$==135;print$w="\e[H","\e[J";{print$w;print$"x$=,$$_?
chop$$_:''for$k..$g;select$,,$,,$,,.01;--$=&&redo}}__END__!!!
C**wX*yX****o*f*****ig*pv*AoB**LhCffX*g*I**I*lyI****8*g*FC8L8
8**v*I*LC*g9*8I*o81ga***ICXp*I*Ig8***CIv*wF*B*8*I*8*wX**gCvIA
g*LA,L>8*Cg*CCyy*w**cIi**F>*L=8**L*X**='CgCLfg*vC8wXgX*Kef*9*
B8C**I*g*gvIALKX*L**C*vy*>I*gX***I*Xg8**w1*}CA*=y8*y******lAyw*
=8C*gy*f****f**y*8**loK****K88A**8f=,*II****'g*f*F*F*wf*v**gvCA
C8*y*y*LIgK******Xf''***'*I***A*X=yiov***g>C*,*8*g****IAgvA*I*X
Fj**gCy*8Xv**89v'*XI*ILy**=A**C1A*8y*v*o**v9KvXyw**f**f**X8**C*
*Fy******C*C9**L*vf**C*vF*8gg$*y**v*8v**AL**II*ILKsK*Xyv**gCI**
8**y fI**K*F*8**L*,*I9*C**8*BiFw*fg,A8h8*gF' B***
vg*L *8*C*8*F*fX*CC8*g*B***,Iv88A***** gC8X
*1*C C***IF*u******CX8**L>Xi=*** *C**
C*v8* **ICI8I*>*KC***8IF*B*8* *oIF*
**K** Av*ALvg**C*I*g**'*wBA **FLg
*'1''* f=*yLLI*****'ff'* *fo*9g
*IA>y F***v*8FIoy'*C* *Lf**
I*8f8v *k'y8F*=vw*>g **Kf**
vy8*X> *K*L*XgKw*' o*g'vF
*1By' gBv*LI*** XX8**
KB***' Xv**A'**8 v***of
ilgCgC* **'***f y*BA*8i
**LI*y* *8IoIv* *oC,y*g
,**gI**= *yC8i 'I8g*L>8
'9{8gB*>A F*18I **8A=*v**
*yA'*1pf** *wv** ****,I8l*v
*IAB*AC*f**f I**yA** yF*C1*Avp***
**gCv'*****KIyK******8C'g9I**yFK*IL8*A=vo*y
C*ABX*F*fv8***AC,*9***wy***IKI****,Kn=i**
**Xf8w*L1*w*9***8*,ygf*X**88oKCIC***I**
I*8*'*F8IL***CL**y*>*>I*****fCC*8LC*y
**XC***A*I*g*C*FA*w****Bv**CfyA*I
g*I*y*****A*BI9'g**gy*Iw*L8*lgX
*IXXX*A**X**8g*I88*I***B*i***
*y**X*FXAyg****Avgo*F*F*F
*XAg*gC*i****,*LI**>*
IK*I*Xg****tv****
XCA**8pr*CIg*
A*K=***y*
