| net :: wire10. MySQL, Sphinx ¹× Drizzle ¿ë ¼ø¼ö Perl µå¶óÀ̹ö |
Áö±Ý ´Ù¿î·Îµå |
net :: wire10. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~dubex/
net :: wire10. ű×
net :: wire10. ¼³¸í
MySQL, Sphinx ¹× Drizzle ¿ë ¼ø¼ö Perl µå¶óÀ̹ö Net :: Wire10Àº Sphinx, MySQL ¹× Drizzle Servers.net:Wire10°ú ´ëÈÇÏ´Â ¼ø¼öÇÑ Perl Ä¿³ØÅÍÀÔ´Ï´Ù .Net:Wire10Àº »ç¿ëÇÏÁö ¾Ê°í ¾Õ¼ ¾ð±Þ ÇÑ ¼¹ö Áß Çϳª¿Í ÅëÈÇÏ´Â µ¥ ÇÊ¿äÇÑ ÇÏÀ§ ¼öÁØÀÇ ³×Æ®¿öÅ© ÇÁ·ÎÅäÄÝ, Alias MySQL ¿ÍÀ̾î ÇÁ·ÎÅäÄÝ ¹öÀü 10À» ±¸ÇöÇÕ´Ï´Ù. ¿¹¸¦ µé¾î libmysqlclient ¶Ç´Â libdrizzle.synopsis¿Í °°Àº ¿ÜºÎ Ŭ¶óÀ̾ðÆ® ¶óÀ̺귯¸®´Â Net :: Wire10À» »ç¿ëÇÕ´Ï´Ù. ³» $ ¿ÍÀ̾î = net :: wire10-> new (host => 'localhost', user => test ', password =>'test ', database => test)); $ ¿ÍÀ̾î -> ¿¬°á; # Ç¥ »ý¼º $ ¿ÍÀ̾î -> Äõ¸® ( "Å×À̺í foo (id int, message text)"); # ¿¹Á¦ $ ¿ÍÀ̾î -> Äõ¸® »ðÀÔ ( "foo¿¡ »ðÀÔ (ID, ¸Þ½ÃÁö) °ª (1, 'hello world')"); PRINTF "¿µÇâÀ»¹Þ´Â Çà : % d \ n", $ ¿ÍÀ̾î -> get_no_of_affected_rows; # ¿¹Á¦ ¿¹Á¦ ³» $ °á°ú = $ ¿ÍÀ̾î -> Äõ¸® ( "¼±ÅÃÇÑ foo"¼±ÅÃ); while (my $ row = $ °á°ú -> next_hash) {printf "ID : % s, message : % s \ n", $ row -> {id}, $ row -> {message}; } $ ¿ÍÀ̾î -> ¿¬°á ²÷±â; ¿ä±¸ »çÇ× : ¡¤ Perl.
net :: wire10. °ü·Ã ¼ÒÇÁÆ®¿þ¾î