in reply to Mail::Internet, body retrieval

Change   $body = $msg->{'Body'}; to   $body = $msg->body(); See Mail::Audit for a working example of how to use Mail::Internet.