スポンサーサイト

--.--.-- *--
上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

emlのFrom行をパースする

2007.09.14 *Fri
レンタルサーバで走らせているperlスクリプトで、MIMEで送られてくるメールをパースする必要が生じた。普通ならMIME::Parseを使って完璧な(?)結果を得なくてはならないが、私が借りているサーバは、元々MIME::*が使えると言っているのにパスが通ってなくて、何度苦情を言っても直してくれないので、仕方ないので自分で書くことにしてみた。

From行にはいろいろなバリエーションがあるので、こういうのは自分でやるのは勧められないそうな。しかし今のところ問題は生じていない。日本語とかになってくると問題も起こるのかもしれないけど、一応Reminder的に載せておく。
($idに、元のFrom行(からFrom:を除いたもの)が入っていると思ってほしい)

if( $id =~ /(.*)<(.+\@.+)>(.*)/ ){
$id = $2 ;
} elsif($id =~ /(.*)\@(.*)/){
$h=$1 ;$t=$2 ;
@h = split( /[ \t,]/,$h ) ;
@t = split( /[ \t,]/,$t ) ;
$id = $h[$#h]."\@".$t[0] ;
}


ところで、こんなことをやるために、と考えると情けない気持ちにもなるのだが、久々に会社に泊まってみた。この時期は暑くも寒くもないので過ごしやすいっすね。しかし眠くなってきた。計算すると、19時間くらいパソコンに向かっている…新婚早々こんな事やってていいのやら。
スポンサーサイト
COMMENT : 0
TRACKBACK : 1
CATEGRY : 実装

COMMENT

Comment Form


秘密にする
 

TRACKBACK

TrackBack List

パースパースは、以下の用語を意味する。パースペクティブ(persepective)の略。遠近法。美術・建築・映画・アニメ・コンピュータグラフィックス|CGなど、広い分野で用いられる言葉である。(''parse'')構文解析を行うこと。(''purse'')財布、がま口。(''Perth'')オースト
2007/10/02(火) 12:39:40 | デザイン用語【な~わ行】 [Del

プロフィール

大和田 茂

Author:大和田 茂


元IT系の研究家。現在はゲーム/玩具作家をめざしている。


Stud Hungering for Intense Gratification and Erotic, Rapturous Undulation


Get Your Sexy Name





Twitter Updates



    follow me on Twitter




    最近の記事



    最近のコメント



    最近のトラックバック



    月別アーカイブ



    カテゴリー



    ブロとも申請フォーム

    この人とブロともになる



    ブログ内検索



    RSSフィード



    リンク

    このブログをリンクに追加する



    Copyright © 大和田茂ブログ All Rights Reserved.
    Images from ふるるか Designed by サリイ
    上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。