($_=sprintf"%s %06d %06d\n",unpack Hww)=~s/e.*/ERROR/,print for('>T`2_PMང??t@ང??_6Pr$6 @g{`M@}S0RE>ffyང??`GVp \'`OEx9','=k`,>h.X0J/SS( U8`]] g8M#00Z9<~SS0E `[lp+\'`=<$P} A@/qSS','`b3p,N:$e seSSP4p@epE4H\pbwma@ YSSxa0ZsP<^SSP;6pB: cqPtrA; ] 5')[7-(()=<>=~/# ##/g)]=~/.{7}/g