Perlについての質問箱 5箱目
■ このスレッドは過去ログ倉庫に格納されています
0283265
NGNG正規表現、今日手をつけたばかりなので詳しい事はわかりませんが、今回その
手法は使えないかな?
メールのサブジェクトを見て「[回覧板 No.dd]…」だったら回覧板宛のレスだと判断。
サーバーの保存された該当番号の回覧板ファイルを参照して、メール本文を追記。
もし、それ意外のタイトルだったら新規の回覧板(回覧板本文の意)として認識する
様に作っています。
よって、$subjはメールから取り出すのでそれ自体はいじれません。
$subj="[回覧板 No.30]タイトル123";
if ($subj=~/\[回覧板\sNo\.(\d+)\]/){
$subj=~/(\d+)/;
$count=$1;
print "$1\n";
}else{
#新規の場合の処理
}
としました。ちゃんと30が帰ってきましたよ(^-^)v
■ このスレッドは過去ログ倉庫に格納されています