linux: call bash script from find command; bash script runs perlcritic on each file found; output appended to file, separated by name of file examined

pcritic.sh

#! /bin/bash
#find lib/ -type f -name "*.pm" | while read file; do ./pcritic_shell.sh "$file"; done

OFILE=critic_out.txt


echo Process $1

echo "= = = = = = = =" >> $OFILE 
echo "= = = = = = = =" >> $OFILE
echo `date` >> $OFILE
echo $1 >> $OFILE
perlcritic -1  $1 >> $OFILE