#!/bin/sh

find_body_dupes.pl $* | \
while read files ; do
    file1=`echo $files | awk '{print $1}'`
    file2=`echo $files | awk '{print $3}'`
    diff_res=`diff $file1 $file2`
    RETVAL=$?
    [ $RETVAL -eq 0 ] && rm -rf $file2
done