#!/bin/sh
find / \( -perm -2000 -o -perm -4000 \) -exec $0.pl {} \; -o -fstype nfs -prune >>$0.out 2>>$0.err