UNIX for Dummies Questions & Answers

4300 23695
4305 03591
4400 125368

4300 23569
4305 01359
4400 123568

awk '{  n=split($0,arr)  asort(arr)  for(i=0;i<=n;i++)     print arr[i]}' file

awk '{ n=split($2,arr) ; asort(arr) ; printf $1 " " ; for(i=0;i<=n;i++) printf arr[i]; print ""}' file

cat file

4300 23695
4305 03591
4400 125368

perl -lane '@a = split(//, $F[1]);@sorted = sort {$a <=> $b} @a;printf("%s ", $F[0]);print @sorted' file

4300 23569
4305 01359
4400 123568

while read a b; do
    echo $a $(echo $b | fold -w1 | sort | paste -sd '')
done

awk '{n=split($2,arr,""); asort(arr); printf "%s ",$1; for(i=1;i<=n;i++) printf "%s",arr[i]; print ""}' file

awk '{n=split($2,arr,""); asort(arr); s=""; for(i=1;i<=n;i++) s=s""sprintf("%s",arr[i]); print $1,s}' file