perl -i.bak -pe's{/sbin/sh\s+/usr/adm/best1_default/bgs/scripts/best1agent_start\s*>>\s*\$LOG\s+2>>\s*\$LOG\s*$} {/usr/bin/su - patrol /usr/adm/best1_default/bgs/scripts/best1agent -q}'

##</code><code>##

find <directory list> <predicates> -exec perl -i.bak -pe'...' {} \;

##</code><code>##

find <directory list> -name '*.bak' | xargs rm