Shell Programming and Scripting

    0.9318    1.4966    0.6361 A   
    0.4709   -0.2878   -0.5030 Bb  
   -0.5738   -1.3981    0.8936 C

A   0.9318   1.4966   0.6361 
Bb  0.4709  -0.2878  -0.5030 
C  -0.5738  -1.3981   0.8936

awk '{ print $4, $1, $2, $3}' $FILE.1 >$FILE.2

A 0.9318 1.4966 0.6361 
Bb 0.4709 -0.2878 -0.5030 
C -0.5738 -1.3981 0.8936

sed 's/\(.*\) \([A-Z].*\)/\2\1/'  file

function setFieldsByWidth(   i,n,FWS,start,copyd0) {
  # Licensed under GPL Peter S Tillier, 2003
  # NB corrupts $0
  copyd0 = $0                             # make copy of $0 to work on
  if (length(FIELDWIDTHS) == 0) {
    print "You need to set the width of the fields that you require" > "/dev/sterr"
    print "in the variable FIELDWIDTHS (NB: Upper case!)" > "/dev/stderr"
    exit(1)
  }

  if (!match(FIELDWIDTHS,/^[0-9 ]+$/)) {
    print "The variable FIELDWIDTHS must contain digits, separated" > "/dev/stdrr"
    print "by spaces." > "/dev/stderr"
    exit(1)
  }

  n = split(FIELDWIDTHS,FWS)

  if (n == 1) {
    print "Warning: FIELDWIDTHS contains only one field width." > "/dev/stderr"
    print "Attempting to continue." > "/dev/stderr"
  }

  start = 1
  for (i=1; i <= n; i++) {
    $i = substr(copyd0,start,FWS[i])
    start = start + FWS[i]
  }
}

BEGIN {
  #FIELDWIDTHS="7 6 5 4 3 2 1" # for example
  FIELDWIDTHS="10 10 10 4" 
  #OFS=" "
}
!/^[  ]*$/ {
  saveDollarZero = $0 # if you want it later
  setFieldsByWidth()
  # now we can manipulate $0, NF and $1 .. $NF as we wish
  print $4,$1,$2,$3
  next
}

sed 's/\(^.\{31\}\)\(.*$\)/\2\1/'

sed 's/[ \t]*$//;s/\(.*\) \([^ \t]*\)$/\2\1/' file