annotate bin/acut @ 297:5e08e6db47ad

add another digit or two (segment #) to key for r_t
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Mon, 05 May 2025 20:57:30 +0100
parents 75e0d0013da0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
1 #!/bin/bash
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
2 # Use awk to do cut -d whitespace
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
3 declare ff=("$@")
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
4 join_array() { local IFS=\$; echo "$*"; }
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
5 s=$(join_array "${ff[@]}")
75e0d0013da0 use awk for simple cut
Henry S. Thompson <ht@inf.ed.ac.uk>
parents:
diff changeset
6 awk '{print '\$${s/\$/,\$}\}