| Ŭ·¡½º :: »ý¼º Ŭ·¡½º :: »ý¼º Perl Ŭ·¡½º °èÃþ ±¸Á¶¸¦ »ý¼º ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Ŭ·¡½º :: »ý¼º ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Steven Wartik
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~swartik/Class-Generate-1.09/Generate.pod
Ŭ·¡½º :: »ý¼º ű×
Ŭ·¡½º :: »ý¼º ¼³¸í
Class :: Generate´Â Perl Ŭ·¡½º °èÃþ ±¸Á¶¸¦ »ý¼º ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù. Class :: Generate´Â Perl Ŭ·¡½º Hierarchies¸¦ »ý¼º ÇÒ ¼öÀÖ´Â Perl ¸ðµâÀÔ´Ï´Ù .Synopsis »ç¿ë Ŭ·¡½º :: QW »ý¼º (Ŭ·¡½º ÇÏÀ§ Ŭ·¡½º delete_class); # class class_nameÀ» declare : class class_name => ; # ÁÖ¾îÁø °ªÀ¸·Î ÃʱâÈ µÈ ±¸¼º¿øÀÌÀÖ´Â class_nameÀÇ ÀνºÅϽº¸¦ ÇÒ´çÇÕ´Ï´Ù (ÂüÁ¶¸¦ »ç¿ëÇÏ¿© ¹è¿ ¹× Çؽø¦ Åë°úÇÕ´Ï´Ù). $ obj = class_name-> new (scalar, a => , h => {key1 => v1, ...}, c => class-> new, c_a => , c_h => ); # ½ºÄ®¶ó À¯Çü Á¢±Ù ÀÚ : $ obj-> s ($ value); # ȸ¿ø¿¡°Ô $ value¸¦ ÇÒ´çÇÕ´Ï´Ù. s. $ member_value = $ obj-> s; # ¾×¼¼½º ¸â¹öÀÇ °ª. # (Ŭ·¡½º) ¹è¿ À¯Çü Á¢±Ù ÀÚ : $ obj-> a (); # ȸ¿ø¿¡°Ô Àüü ¹è¿À» ÇÒ´çÇÕ´Ï´Ù. $ obj-> a (2, $ °¡Ä¡); # $ obj-> add_a ($ value); # APPEND $ °ªÀ» ¹è¿ÀÇ ³¡¿¡ Ãß°¡ÇϽʽÿÀ. @a = $ obj-> a; # Àüü ¹è¿¿¡ ¾×¼¼½ºÇÕ´Ï´Ù. $ ary_member_value = $ obj-> a (2); # Access Array ¸â¹ö 2. $ s = $ obj-> a_size; # ¹è¿ÀÇ ¹Ýȯ Å©±â. $ value = $ obj-> last_a; # ¹è¿ÀÇ ¸¶Áö¸· ¿ä¼Ò¸¦ ¹ÝȯÇÕ´Ï´Ù. # (class) Çؽà À¯Çü Á¢±Ù ÀÚ : $ obj-> h ({k_1 => v1, ..., k_n => v_n}) # Àüü Çؽø¦ ȸ¿ø¿¡°Ô ÇÒ´çÇÕ´Ï´Ù. $ obj-> h ($ Å°, $ °ª); # Çؽà ¸â¹ö $ Å°¿¡ $ value ÇÒ´ç. % hash = $ obj-> h; # Àüü Çؽÿ¡ ¾×¼¼½ºÇϽʽÿÀ. $ hash_member_value = $ obj-> h ($ Å°); # Access Çؽà ȸ¿ø °ª $ Å°. $ obj-> delete_h ($ Å°); # $ Å°°¡ Á¡·É ÇÑ ½½·Ô »èÁ¦. @Keys = $ obj-> h_keys; # ȸ¿øÀÇ ¾×¼¼½º Å° h. @values = $ obj-> h_values; # ȸ¿øÀÇ ¾×¼¼½º °ª h. $ = $ obj-> »çº»; # °³Ã¼¸¦ º¹»çÇÕ´Ï´Ù. if ($ obj-> ($ obj->) {...} # ÆòµîÀ» Å×½ºÆ®ÇϽʽÿÀ. subclass s => [], -parent => 'class_name'; Ŭ·¡½º :: ÆÐÅ°Áö¸¦ »ý¼ºÇÏ´Â ÆÐÅ°Áö ³»º¸³»±â´Â Ŭ·¡½º »ç¾ç °úÀÌ »ç¾ç¿¡¼ »ý¼º µÈ Perl 5 Ŭ·¡½ºÀÔ´Ï´Ù. »ç¾ç ¾ð¾î´Â ÀÔ·Â µÈ ¸â¹ö, »ó¼Ó, °³ÀÎ ±¸¼º¿ø, Çʼö ±¸¼º¿ø, ±âº»°ª, °´Ã¼ ¸Þ¼Òµå, Ŭ·¡½º ¸Þ¼Òµå, Ŭ·¡½º º¯¼ö ¹× more.cpanÀÌ À¯»çÇÑ ÆÐÅ°Áö¸¦ Æ÷ÇÔÇÕ´Ï´Ù. ¶Ç ´Ù¸¥ »ç¶÷? °´Ã¼ ÁöÇâ ÇÁ·Î±×·¡¹Ö, ƯÈ÷ Perl°ú °°Àº µ¿Àû ¾ð¾î¿¡¼´Â º¹ÀâÇÑ ³ë·ÂÀ̱⠶§¹®¿¡. ³ª´Â ´ç½ÅÀÌ ÀϹÝÀûÀ¸·Î ´ç½ÅÀ» (Àß, ³ª´Â ¾î·µç) ¿À·ù¸¦ Àâ±â À§ÇØ ¸Å¿ì ¿½ÉÈ÷ ÀÏÇÏ´Â ÆÐÅ°Áö¸¦ ¿øÇß½À´Ï´Ù. ³ª´Â °´Ã¼ ÁöÇâ ÇÁ·Î±×·¡¹Ö °è¾àÀ» ½ÃÇàÇÏ´Â µ¥ µµ¿òÀÌ µÉ ¼öÀÖ´Â ÆÐÅ°Áö¸¦ ¿øÇß½À´Ï´Ù. ³ª´Â ¶ÇÇÑ ³»°¡ ¹°¾úÀ» ¶§µµ ¹æ½Ä¿¡¼ ¹þ¾î³ª±â¸¦ ¿øÇß´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
Ŭ·¡½º :: »ý¼º °ü·Ã ¼ÒÇÁÆ®¿þ¾î