11/03/04 05:16:21.85 .net
fml4 で以下のようなことをしたいのですが、どう書けばいいでしょうか。
URLﾘﾝｸ(www.fml.org)
11. To: と Cc: の中にある fml8 が管理しているＭＬのアドレスだけを Reply-To: に設定する。
説明しにくい動作ですが、 ようするに記事から自分の知らないアドレスを削除するということです。
ヘッダに書いてある全てのアドレスへ返信する人が多いので、 こういった動作が有用であることがあります。
設定は、だいぶ複雑ですが HOOK だけで実現できます。 次の HOOK を config.cf の最後(=cut 行より下側)に書いて下さい。
$article_header_rewrite_end_hook = q{
my $to = $header->get('to');
my $cc = $header->get('cc');
my $addr = "$to, $cc";
use Mail::Address;
my (@addrlist) = Mail::Address->parse($addr);
my $reply_to = '';
for my $a (@addrlist) {
my $_addr = $a->address;
if ($curproc->is_fml8_managed_address($_addr)) {
$reply_to .= $reply_to ? ", $_addr" : $_addr;
}
}
$header->replace('Reply-To', $reply_to) if $reply_to;
};