| °´Ã¼ :: °ü°è :: meta :: ¼Ó¼º :: ½ºÅ°¸¶ °´Ã¼ :: °ü°è :: meta :: attribute :: schema´Â °³Ã¼ :: °ü°è µ¥ÀÌÅͺ£À̽º ÀúÀå¼Ò ÀÛ¼º±â¸¦À§ÇÑ Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
°´Ã¼ :: °ü°è :: meta :: ¼Ó¼º :: ½ºÅ°¸¶ ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Kineticode, Inc.
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~dwheeler/Object-Relation-v0.1.0/lib/Object/Relation/Setup/DB/SQLite.pm
°´Ã¼ :: °ü°è :: meta :: ¼Ó¼º :: ½ºÅ°¸¶ ű×
°´Ã¼ :: °ü°è :: meta :: ¼Ó¼º :: ½ºÅ°¸¶ ¼³¸í
°´Ã¼ :: °ü°è :: meta :: attribute :: schema´Â °³Ã¼ :: °ü°è µ¥ÀÌÅͺ£À̽º ÀúÀå¼Ò ºô´õ¸¦À§ÇÑ Perl ¸ðµâÀÔ´Ï´Ù. °³Ã¼ :: °ü°è :: meta :: attribute :: schema´Â °³Ã¼¿¡ ´ëÇÑ Perl ¸ðµâÀÔ´Ï´Ù. relation µ¥ÀÌÅͺ£À̽º ÀúÀå¼Ò builder.synopsis # object :: reation :: meta¿Í ¿ì¸®°¡ °ÇÃàÇÏ°íÀÖ´Â °ÍÀº ¿ì¸®°¡ ½×ÀÌ´Â °ÍÀ¸·Î °¡Á¤ÇÕ´Ï´Ù. °³¿ä. ³» $ class = mythingy-> my_class; "nattributes : n"À» ÀμâÇϽʽÿÀ; $ attr ($ class-> ¼Ó¼º) {print "o", $ attr-> name, $ /; Àμâ "¿ :", $ attr-> ¿, $ /; if (my $ idx = $ attr-> »öÀÎ) {print "»öÀÎ : $ iidxn"; } if (my $ ref = $ attr-> ÂüÁ¶) {print "ÂüÁ¶", $ ref-> ÆÐÅ°Áö, $ /; "»èÁ¦ :", $ attr-> on_delete, $ /; }}ÀÌ ¸ðµâÀº ½ºÅ丮Áö ½ºÅ°¸¶¸¦ ÀÛ¼ºÇÏ´Â µ¿¾È ¸ðµç °´Ã¼ :: °ü°è Ŭ·¡½º ¼Ó¼º¿¡ ´ëÇÑ ¸ÞŸ µ¥ÀÌÅ͸¦ Á¦°øÇÕ´Ï´Ù. °´Ã¼·Îµå :: °ü°è :: ½ºÅ°¸¶´Â object :: relation :: meta :: ¼Ó¼º ´ë½Å »ç¿ëµÇµµ·ÏÇÕ´Ï´Ù. ÀÌ´Â ½ºÅ°¸¶¸¦ ±¸¼ºÇÏ´Â µ¥ À¯¿ëÇÑ Ãß°¡ ¸ÞŸ µ¥ÀÌÅÍ ¸Þ¼Òµå°¡ »ç¿ë °¡´ÉÇÏÁö¸¸ ÀÀ¿ë ÇÁ·Î±×·¥ÀÌ ½ÇÁ¦·Î »ç¿ë ÁßÀÏ ¶§ À¯¿ëÇÏÁö´Â ¾Ê½À´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
°´Ã¼ :: °ü°è :: meta :: ¼Ó¼º :: ½ºÅ°¸¶ °ü·Ã ¼ÒÇÁÆ®¿þ¾î