$_=q[s;.*;94eae6e840
c2dcdee8d0cae440a0ca
e4                d8
40                d0
c2                c6
d6                ca
e4                14
;s                ;@
_=                /.
./                g;
fo                r(
@_                ){
$_                =c
hr                ((
he                x)
>>1)}$_=join'',@_;pr
int];s; |\n;;g;eval;