view bin/acut @ 1:95740c6658a3

from Meg
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Wed, 10 Jun 2026 13:04:44 +0100
parents 2aa53823fb21
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/\$/,\$}\}