while(<DATA>){chomp;for(0..(@f = split'')){print' 'x hex$f[0],"\cB"x hex$f[1];splice(@f,0,2)}print "\n";}

__DATA__
E6
CA
BC
A42224
A42224
AE
A21812
A31613
B363
CA
E6
10
10
41212221211442
412111211121116121
441411211344
412111211121116121
4121112122243121
10
10
112111222433322121
121111112111612111211121
111211114341211422
1121111121116121112122
112111222433212122