[PHP-users 8850] Re: メールのheader を取得の仕方

[小野 昇一]

加藤さん
小野です。

Subject: [PHP-users 8845] Re: メールのheader      を取得の仕方
----

>加藤です。
>
〜〜省略〜〜
>> >From test@hoge.com  Tue Jul 22 7:00:50 2002
>> 
>これだけ、ということはaliasesかlocalの設定の問題という
>ことも考えられますね。
>私はこういう処理をしたことがないのでどうすれば良いか
>解りませんが、aliases, localのmanを読んでみたらどうでしょう？
>
>localのmanをざっと見たら、外部コマンドへ配送する
>場合にこの形式のヘッダを追加すると書いてありました。
>
そうみたいですね。
でも、perlに渡して処理をした時は
とれてるんです。
以下がperlでの例なのですが、

open(TMP,"> /tmp/tmp_$$");

while (<STDIN>) {

        if ($in_header) {
                if (/^$/) {
                        $in_header =0 ;
                        print TMP $headers;
                }else{
                        if (/^Date: /) {$date = $_; }

                        # for 2 or more line subject
                        if (/^\s+(.*)/) {
                                chop($headers);
                                s/^\s+// ;
                        }
                        $headers .= $_ ;
                }
        }

        if (! $in_header){
                print TMP "$_" ;
        }

}

これで[tmp_プロセス番号]に入ってくるのは
>From test@hoge.com  Fri Jul 19 13:28:58 2002
Return-Path: <test@hoge.com>
Delivered-To: send@hoge.com
Received: by evian.in.nttpc.co.jp (Postfix, from userid 0)
        id 853C75CC09; Fri, 19 Jul 2002 13:28:58 +0900 (JST)
To: send@hoge.com
Subject: TEST
Message-Id: <20020719042858.853C75CC09@hoge.com>
Date: Fri, 19 Jul 2002 13:28:58 +0900 (JST)
From: test@hoge.com

TEST

となります。

>----
>加藤昌也                        株式会社ニルソフトウェア
>                                    E-mail  kato@nil.co.jp
>                                    TEL     03-3749-8601
>                                    FAX     03-3749-8602
>
>_______________________________________________
>PHP-users mailing list
>PHP-users@php.gr.jp
>http://ns1.php.gr.jp/mailman/listinfo/php-users

--------------------- Original Message Ends --------------------

小野　昇一<shoichio@nttpc.co.jp>