2010年7月 3日

Re: fml8 上での MySQL連携

お世話になっております、渡辺と申します。

昨日王踉撒?離瓠?彔ルを投稿させて頂きましたが、過去の記事を
(858,859番と同様の?彔昳靴任靴拭忙温佑\xCBIO::Adapter?彔?蠅\xF2
探したところ、

Mail/Delivery/Queue.pm
>sub set_recipient_maps

>{
>$B!JN,!K(B
> use IO::Adapter;
> my $io = new IO::Adapter $map;

$B$H0z?t$,>/$J$$ItJ,$r8+$D$1$?$?$a!"$3$A$i$r%A%e!<%H%j%"%k(B
$B$r;29M$K(B
use IO::Adapter;
my $config = new FML::Config;
my $io = new IO::Adapter $map, $config;
$B$K$7$?$H$3$mL5;vF0$-$^$7$?!#(B

$B2a5n%m%0$K$bM-$j$^$7$?$,!"(Bmembers$B$NH=Dj$NItJ,$K(B@$B0J2<$,(B
$B4^$^$l$J$$=j$J$I!"$b$&>/$78+$F$$$-$?$$$H;W$$$^$9!#(B

$B<h$j5^$.8fNi$^$G!#(B

At 10:51 10/07/01, Genki Watanabe wrote:
>$B=i$a$F%a!<%k$5$;$FD:$-$^$9!"EOJU$H?=$7$^$9!#(B
>
>ML$B$N%5!<%P$NF~$lBX$($K9g$o$;$F(Bfml8$B$X$NJQ99$r<B;\$7$F$*$j!"(B
>$BDL>o$N(Bfile$B$rMxMQ$7$?G[?.$^$G$O0\9T$,40N;$7$?$N$G$9$,!"(B
>MySQL$BO"7H$NItJ,$G$D$^$E$$$F$7$^$$$^$7$?!#(B
>
>$B%3%s%U%#%0%U%!%$%k$N=q$-J}$J$I4pK\E*$J8+Mn$H$7$,#$j$=$&$J(B
>$B5$$,$9$k$N$G$9$,!">/$7<j5M$^$j>uBV$G$7$F!"$I$J$?$+;w$?$h$&$J(B
>$B4D6-$GF0:n$5$l$F$$$kJ}$O$$$i$C$7$c$$$^$;$s$G$7$g$&$+!)(B
>
>$B!J<B;\FbMF!K(B
>$B%a%s%P!<%j%9%H$r(BMySQL$B$+$i<h$C$F$/$k9=@.$K$7$h$&$H9M$($F$$$k(B
>$B$?$a$K!"(BML$B$N(Bconfig.cf$B$N(B=cut$B$N>e$N9T$K(B
>- - - - - - - - - - - -
>primary_recipient_map = mysql:fml
>primary_member_map = mysql:fml
>
>[mysql:fml]
>sql_server = localhost
>sql_user = fml
>sql_password = password
>sql_database = fml
>sql_table = ml
>sql_query_get_next_key = select fml_address from $sql_table where
>fml_ml = '$ml_name' and fml
>_domain = '$ml_domain' and fml_recipient = '1'
>sql_query_getline = select fml_address from $sql_table where fml_ml
>= '$ml_name' and fml_domai
>n = '$ml_domain' and fml_recipient = '1'
>sql_query_add = update ml set recipient = 1 where fml_ml =
>'$ml_name' and fml_domain = '$m
>l_domain' and fml_address = '&address'
>sql_query_delete = update ml set recipient = 0 where fml_ml =
>'$ml_name' and fml_domain = '$ml_domain' and fml_address = '&address'
>sql_query_find = select fml_address from $sql_table where fml_ml
>= '$ml_name' and fml_domain = '$ml_domain' and fml_address like '%®exp%'
>
>$B$r2C$($F%F%9%H$7$?$N$G$9$,!"G[?.$,$G$-$^$;$s!#(B
>
>$B%m%0$K$h$k$H(BFilter$B$ODL$C$F(Barticle$B$b<hF@$7$F$$$k$h$&$J$N$G$9$,!"(B
>recipient_map$B$r<hF@$9$k(BMySQL$B%5!<%P$X$N@\B3ItJ,$G<:GT$7$F$$$k(B
>$B$h$&$G$9!#(B
>
>$B!&(Bfml$B$N%m%0(B
>10/07/01 09:23:22 distribute[27869] sender: rinse@xxxxx
>10/07/01 09:23:22 distribute[27869] mime_component_filter: permit
>(text/plain * permit)
>10/07/01 09:23:22 distribute[27869] article 92
>$B!&(BMySQL$B$N%G%P%C%0%m%0(B
>100701 9:23:22 115 Connect Access denied for user
>'fml'@'localhost' (using password: NO)
>
>
>password:NO$B$G@\B3$7$KMh$F$$$k$h$&$J$N$G!";n$7$K(Bfml$B$N%Q%9%o!<%I$r(B
>$B6u$K$7$F;n9T$7$F$_$?$H$3$m!"(B
>$B!&(Bfml$B$N%m%0(B
>10/07/01 09:24:04 distribute[28142] sender: rinse@xxxxx
>10/07/01 09:24:04 distribute[28142] mime_component_filter: permit
>(text/plain * permit)
>10/07/01 09:24:04 distribute[28142] article 93
>
>$B!&(BMySQL$B$N%G%P%C%0%m%0(B
>100701 9:24:05 117 Connect fml@xxxxx on
> 117 Query set autocommit=0
> 117 Query
> 117 Quit
>$B$H$J$C$F$*$j!"(B[mysql:fml]$B$G5-:\$7$?FbMF$,(BIO::Adapter::DBI$B$K(B
>$BEA$o$C$F$*$i$:!"%O!<%I%3!<%G%#%s%0$5$l$F$$$k(Bfml@xxxxx /
>$B%Q%9%o!<%IL5$7$G@\B3$5$l!"(BQuery$B$bEj$2$i$l$F$$$J$$$h$&$K(B
>$B8+$($^$9!#!J(Bfmlconf -n$B$G8+$F$_$k$H(B[mysql:fml]$B$O(Bconfig$B$K(B
>$BH?1G$5$l$F$$$k$h$&$K8+$($k$N$G$9$,!D!K(B
>
>$B>/$7A0$N4D6-$NJ*$G<B9T$7$F$bF1MM$N7k2L$G$7$?!#!J%P!<%8%g%sEy(B
>$B$OKvHx$K5-:\$7$^$9!K(B
>
>Redhat Enterprise Linux 5.4
> fml 7.98.15-20100306
> mysql 5.0.77
> Perl 5.8.8
>
>CentOS 4.8
> fml 7.98.12-20600625
> mysql 4.1.22
> Perl 5.8.5
> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> $BEOJU(B $B855$(B(WATANABE Genki)
> E-mail:rinse@xxxxx

投稿者 xml-rpc : 2010年7月 3日 01:44
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/96752
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。