$_=<>;
for$i(0..length){substr$_,$i,2,join'',sort split//,substr$_,$i,2}
print