Different versions of sendmail differ in their switches but open((RMAIL, "|/usr/lib/sendmil -f me@my.host.com -t"); should work on most. Bounced email reports will then be sent to me@my.host.com
Refer to man sendmail for details.
$japh->{'Caillte'} = $me;