#!/bin/csh

# simple program for setting ace bits
# usage: sedacl filename entry-regexp rwx

set ex = /$2/s'/\('$2'.*:\)...$/\1'$3/

getfacl $1 |grep -v '^#' |sed "$ex" |setfacl --set-file=- $1
