genlongsubject() {
len="${1:-998}"
awk -v len="$len" 'BEGIN {
- prefix = "Subject: " len
+ prefix = "Subject: " len " "
while (i++<len) {
s = s "x"
}
- re = ".{" length(prefix) "}."
- sub(re, prefix " ", s)
- print s
+ print prefix substr(s, length(prefix) + 1)
}'
}