Bob Dodds said the following on 02/19/2006 03:23 AM:
> I don't respect other peoples' commas that much.
> Maybe that's because I delete them before I get
> to know them.
>
> my @logfields = (
> $prev_hook,
> $return,
> ( $return_text =~ s/,//g ? $return_text : $return_text ),
> $sender,
> $recipients,
> $mail_size,
> $self->qp->connection->remote_host,
> $self->qp->connection->remote_ip,
> $relay_client,
> $auth_method,
> $auth_user
> );
Well, that's another approach.
It doesn't catch commas in any other fields though - $sender and
$recipients can contain commas; I'm not sure about other fields.
> I need message ID.
my $msgid = '';
if (defined $transaction->header) {
$msgid = $transaction->header->get('Message-Id') || '';
}
R.
