| ³ØŸÀÌ :: DBIX :: Class. DBIX :: Class ResultSetÀ» Çؽÿ¡ ¹½À´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
³ØŸÀÌ :: DBIX :: Class. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Sebastian Willing
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~sewi/
³ØŸÀÌ :: DBIX :: Class. ű×
³ØŸÀÌ :: DBIX :: Class. ¼³¸í
DBIX :: Class ResultSetÀ» Çؽÿ¡ ¹½À´Ï´Ù TIE :: DBIX :: CLASS´Â DBIX :: CLASS :: ResultSetÀ» °£´ÜÇÑ Çؽÿ¡ ¹´Â Perl ¸ðµâÀÔ´Ï´Ù. ÂüÁ¶ µÈ DBIX :: Class :: ResultSET ¿äû½Ã¿¡¸¸ ÂüÁ¶ µ¥ÀÌÅͺ£À̽º access.dbix :: class°¡ SQLÀ» ÁÙÀÔ´Ï´Ù. ´Ü¼øÇÑ °´Ã¼·Î ÇàÀ» »ç¿ëÇÏ°í ½ºÅ©¸³Æ®ÀÇ ¸ðµç SQLÀ» ¸¶½ºÅ©ÇÏÁö¸¸ ¾ö°ÝÇÏ°Ô µ¥ÀÌÅͺ£À̽º ±â¹ÝÀÔ´Ï´Ù. ´ç½ÅÀº ÁýÀ» ¾ò¾ú½À´Ï´Ù : My $ House = House-> new (1); $ HOUSE-> OPEN_DOOR (); $ HOUSE´Â SQL ÇàÀÌ µÉ ¼ö ÀÖÁö¸¸ SQL ÇàÀÌ ¾Æ´Ñ ¸Þ¼Òµå ¶Ç´Â ÇÏÀ§ °´Ã¼¸¦ Ãß°¡Çϱ⸦ ¿øÇÑ´Ù¸é TIE-DBIX Ŭ·¡½º°¡ ¹«¾ùÀÎÁö : ÆÐÅ°Áö ÇϿ콺 ; sub new {my $ class = shift; ³» $ house_id = shift; ³ØŸÀÌ (³» % Çà, ³ØŸÀÌ :: dbix :: class ', $ main :: schema,'Houses ', $ house_id); ¹Ýȯ Ãູ \ % Çà, $ class; } sub open_door {# µµ¾î ÄÁÆ®·Ñ·¯¿¡ ¾×¼¼½º} ¸ðµç ¿Àº Ãູ¹ÞÀº °³Ã¼ÀÇ Çؽà Ű·Î ¾×¼¼½º ÇÒ ¼ö ÀÖ½À´Ï´Ù. Ãß°¡ ¸Þ¼Òµå¸¦ Á¤ÀÇ ÇÒ ¼ö ¾ø½À´Ï´Ù. Ãß°¡, TIE :: DBIX :: CLASS´Â ù ¹ø° ¾×¼¼½º¸¦ ±â´Ù¸®°í ÀÖ½À´Ï´Ù. ÇؽÃÀÇ µ¥ÀÌÅÍ°¡ ½ÇÁ¦·Î µ¥ÀÌÅͺ£À̽º¿¡¼ µ¥ÀÌÅ͸¦ °¡Á® ¿À±â Àü¿¡ µ¥ÀÌÅͺ£À̽º¿¡¼ µ¥ÀÌÅ͸¦ °¡Á® ¿À±â Àü¿¡ all.tie :: DBIX :: Class°¡ ÅÛÇø´°ú ÇÔ²² »ç¿ëÇÒ ¼ö ÀÖµµ·Ï °³¹ßµÇ¾ú½À´Ï´Ù. ÅøŶ. ÅÛÇø´Àº ÅÛÇø´¿¡¼ »ç¿ëÇÒ ¼öÀÖ´Â ¸ðµç °ÍÀ» »çÀü·Îµå ÇÒ ÇÊ¿ä¾øÀÌ µ¥ÀÌÅͺ£À̽º Çà¿¡ ¾×¼¼½º ÇÒ ¼ö ÀÖ½À´Ï´Ù. °´Ã¼¸¦ ¸¸µé°í ÅÛÇø´ :: ÅøŶÀ¸·Î ´·¯¼ ÇÊ¿äÇÑ ÇàÀÌ ÀÚµ¿À¸·Î·ÎµåµË´Ï´Ù. Synopsis My $ object = tie :: dbix :: class-> new (foo => bar ', flag => 1) ...¿¡ ¿ä±¸ »çÇ× : ¡¤ Perl.
³ØŸÀÌ :: DBIX :: Class. °ü·Ã ¼ÒÇÁÆ®¿þ¾î