qse/regress/awk/lang-036.awk

9 lines
136 B
Awk

{
if ($0 ~ /^-+$/) {
getline x; printf " %s\n", x; nobar=0;
}
else {
if (nobar) printf "\n"; printf "%s", $0; nobar=1;
}
}