#!/bin/rc 

switch($#*){
case 2
case 3
path='*'
while(){
        eval /bin/chgrp $*/$path >[2] /dev/null
        chgrpstatus=$status
        path=$path^'/*'
        if (~ $chgrpstatus *stat) exit
}
case *
        echo 'usage: chgrpr [-u] group dir'
}