view bin/acut @ 111:ab3d547f3e76

one uncommited fix from quentin
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Fri, 22 Sep 2023 15:27:28 +0100
parents 75e0d0013da0
children
line wrap: on
line source

#!/bin/bash
# Use awk to do cut -d whitespace
declare ff=("$@")
join_array() { local IFS=\$; echo "$*"; }
s=$(join_array "${ff[@]}")
awk '{print '\$${s/\$/,\$}\}