diff options
Diffstat (limited to 'contrib/awk/awklib/eg/lib/join.awk')
-rw-r--r-- | contrib/awk/awklib/eg/lib/join.awk | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/contrib/awk/awklib/eg/lib/join.awk b/contrib/awk/awklib/eg/lib/join.awk new file mode 100644 index 0000000..f52f5e6 --- /dev/null +++ b/contrib/awk/awklib/eg/lib/join.awk @@ -0,0 +1,15 @@ +# join.awk --- join an array into a string +# Arnold Robbins, arnold@gnu.org, Public Domain +# May 1993 + +function join(array, start, end, sep, result, i) +{ + if (sep == "") + sep = " " + else if (sep == SUBSEP) # magic value + sep = "" + result = array[start] + for (i = start + 1; i <= end; i++) + result = result sep array[i] + return result +} |