1*219b2ee8SDavid du Colombier#!/bin/rc 2*219b2ee8SDavid du Colombier 3*219b2ee8SDavid du Colombiersed ' 4*219b2ee8SDavid du Colombier s/[ ]+$// 5*219b2ee8SDavid du Colombier / /!d 6*219b2ee8SDavid du Colombier /, /{; h; s/,.*//; p; g; s/ .*, / /; } 7*219b2ee8SDavid du Colombier' $1 | 8*219b2ee8SDavid du Colombiersed ' 9*219b2ee8SDavid du Colombier /\(/{; h; s/\([^)]+\)//; p; g; s/[()]//g; } 10*219b2ee8SDavid du Colombier' | 11*219b2ee8SDavid du Colombiersed ' 12*219b2ee8SDavid du Colombier s/ +/ / 13*219b2ee8SDavid du Colombier s/[ ]+$// 14*219b2ee8SDavid du Colombier s/ +/ /g 15*219b2ee8SDavid du Colombier' 16