print$"x(318%$_/9),(($_-$`)%12?o:x)&($_%12^$'/5?o:'}'),$/x($_/85)for unpack<>!~/:/.C12,'XXXXXXXXXXXX'

##</code><code>##

$X = pack 'C*', 120, 47, 253, 22, 194, 9, 183, 44, 196, 55, 125, 246;
print$"x(318%$_/9),(($_-$`)%12?o:x)&($_%12^$'/5?o:'}'),$/x($_/85)for unpack<>!~/:/.C12,$X