{
  local($/) = undef;  # Prepare for slurp
  $mail = <>;  # Slurp entire email from stdin
}

# Modify the email subject, etc
# Leave this part to me

# Forward the email
$recipient = 'me@mydomain.com';
???  # Not sure how to send $mail as an email