map {printf"%3d %2x %2s|",$_,$_,$_<32?'^'.chr$_+64:$_<127?chr$_:'^?'} (0..127);