#!/bin/sh

tmp=/tmp/buffer$$
trap "rm -f $tmp" 0 1 3 15

find ../../ -type f -print |\
egrep -v 'cpan|CVS|regress|__template|\.ps$' > $tmp

egrep '__[A-Z]' `cat $tmp`|\
egrep -v '__FILE__|__END__|__DATA__'