
Former-commit-id: 93fac7a70052d06c2a12bf8af59820c653edd31b Former-commit-id: 0869fdad0f550941a0f78f1e4c57f4fcdb3f6076
19 lines
328 B
Awk
19 lines
328 B
Awk
#
|
|
|
|
{
|
|
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
|
|
}
|
|
}
|