cutline.awk 328 Bytes
Newer Older
alain viari's avatar
alain viari committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
#

{
  line = $0
  if (length(line) > 80) {
    print substr(line, 1, 80)
    rest = substr(line, 81)
    while (length(rest) > 59) {
      print "FT                   " substr(rest, 1, 59)
      rest = substr(rest, 60)
    }
    if (length(rest) > 0)
      print "FT                   " rest
  } 
  else {
    print line
  }
}