perl -le '@a=qw(a e f c b d); $_=$i++ for sort @a; print @a'
045213