12/02/22 22:24:50.31
>>978
レスありがとございます。
探したのですが見つからず・・・
実際、日記でもブログでもアプロダでも何でも良くて、結局使う部分は、「メールで画像を送信、保存」だけなんです。
ｍａｉｌｓｅｒｖｅｒは自宅で稼働しています。
それ・・・頂けるのですか？？
980:978
12/02/23 21:38:57.29
>>979
多分「メールボックスに保存しておく」じゃあ駄目だよね・・・
今HDD探したら有った、
30stepぐらいの粗末で一部未完成なスクリプトだけどそれで良ければ
あとperlとprocmail使うんだけどいける？
981:971
12/02/24 22:34:34.32
目当てのカウンターが見つかったら報告します。
報告が無い間は探しているということですので、協力歓迎でございます。
982:nobodyさん
12/02/25 21:54:35.42
983:nobodyさん
12/02/26 21:18:16.45
保守
984:977
12/02/27 02:40:21.21
>>980
レス遅くなりました。
メールボックスに
保存してあるやつから、画像抽出ができればいいんです。
ようは、cgiにアクセスすると同時に画像取得したいんですよね。
すみませんが、いただきたいです。
あとは頑張って自分後のみにしてみます。
985:nobodyさん
12/02/27 23:03:00.54
保守
986:nobodyさん
12/02/28 21:58:03.39
987:nobodyさん
12/02/29 20:10:18.87
保守
988:978
12/02/29 21:35:47.86
①procmail.rcに追記
:0 c
* ^TO.*picture@xxxxxxx-xxxxxxxx.xxxx
| /home/xxx/bin/mail2.pl
②/home/xxx/bin/mail2.plに記述
#!/usr/local/bin/perl
use MIME::Parser;
local $/;
$buf= <>;
$ftime = time() ;
$parser = new MIME::Parser;
$parser->output_to_core(1);
$parser->tmp_recycling(1);
$parser->tmp_to_core(1);
$parser->use_inner_files(1);
$entity = $parser->parse_data($buf) or die "Can not parser\n";
if ( $entity->is_multipart ) {
for ( $i=0 ; $i<$entity->parts ; $i++ ) {
$filename = $entity->parts($i)->head->recommended_filename ;
if ( $filename ne "" ) {
open(FF,">/home/xxx/public_html/file/$ftime.$filename") or die "Can not open file\n" ;
print FF $entity->parts($i)->bodyhandle->as_string;
close(FF) ;
}
}
}
989:978
12/02/29 21:44:49.87
>>984
作ったのはこんな>>988感じ
本当は排他処理と年月フォルダ分けする機能があるのを作ったけど、
もしそちらが欲しければ声かけてください。
使い方は、「picture@xxxxxxx-xxxxxxxx.xxxx」にメールを送ると、
「/home/xxx/public_html/file/」に添付ファイルが保存される。
過去のメールから抽出する場合は「cat /home/xxx/Mailbox/cur/xxxx | ./mail2.pl」で
出来ると思います。
一応iphoneとガラケーでテストして添付ファイルが抽出できた
iphoneの場合、$filenameが文字化けしてたので、$filenameの付近を書き換えてください
990:nobodyさん
12/03/01 20:54:19.36
991:977
12/03/01 23:10:23.25
>>989
ありがとうございます。
自分でも簡単なwebアプリ作ったり、うちの親経営の塾の事務ソフトをperlでcgi動かしたりしてるけど、そんな俺でも理解できんかった・・・。
やっぱ作るものが違うと、同じoerlでも分からないんだね。
聞いた事ないのばっかだ。
どうもありがとう。後は自分でなんとかします。
2chでスクリプト教えてもらったの初めてだ。ありがとう。
992:978
12/03/02 22:09:56.14
>>991
結局使えなかったてこと？
ただ、確かに>>989の説明は解り難かったかも
>>988のCGIは、メールファイルを標準入力で受け取って、添付ファイルを抽出する
処理の流れとして「メール受信→postfix等→procmail→>>988のCGI」と言う感じ
OSとか書いてなかったけどFreeBSDで動きました
保存してあるメールファイルから抽出するなら「$buf= <>; 」を
書き換えればいいと思うので、あとは好きに書き換えちゃってください
993:nobodyさん
12/03/03 22:11:29.28
994:nobodyさん
12/03/04 21:25:40.97
保守
995:nobodyさん
12/03/05 20:31:34.64
996:nobodyさん
12/03/06 02:17:26.17
保守だけで１０００か？
997:nobodyさん
12/03/06 03:03:57.78
次スレ立てようか？
998:nobodyさん
12/03/06 03:30:18.84
お願いします。
999:nobodyさん
12/03/06 05:55:44.87
ｽﾚﾘﾝｸ(php板)
立てました