Shell Programming and Scripting

#!/bin/ksh93                 # set to ksh93 so we can use substring 
cat "file" |
while IFS=\n read I          # read the next record into I
do                           # do not parse out blanks, tabs in the record by setting IFS to newline char only
  D1=${I:27:1}               # isolate byte 27 into D1
  if [[ "$D1" = " " ]]       # if byte 27 = a blank
  then
     ${I:27:1}="-"           # change byte 27 to a dash "-"   <-- ### WARNING, this syntax is invalid ###          
  else
    :                        # no change to byte 27 
  fi  
  print "$I"                 # write out record  
done

$ x=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLNMOPQRSTUVWXYZ
$ echo $x
abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLNMOPQRSTUVWXYZ
$ echo ${x,27,1}
/opt/ksh93/bin/ksh: syntax error: `,' unexpected
$ echo ${x:27:1}
B
$ echo ${.sh.version}
Version M 1993-12-28 m+
$

$ x=${x:0:27}'-'${x:28}
$ echo $x
abcdefghijklmnopqrstuvwxyzA-CDEFGHIJKLNMOPQRSTUVWXYZ
$