## ", and doesn't have a Return-Path. Fix that up so spamassassin
## is happy.
$message =~
- s{^(Received: at \S+\ by \S+;[^\n]+\n)(From (\S+) [^\n]+\n)}
- {${1}Return-Path: $3\n$2};
+ s{^(Received: \(at \S+\) by \S+;[^\n]+\n)(From (\S+) [^\n]+\n)}
+ {Return-path: $3\n$1};
return $message;
}