Catalystã®Attributesãåæåãããã¾ã§ ã¡ãã£ã¨Soozyã«ãChainedã£ã½ãä»çµã¿ãåãå ¥ãããã¦Catalystã®Attributesã®ã³ã¼ãã追ãããã¦ã¾ããã ãã§ãã¨ããããååã®ã¨ã¹ã±ã¼ãã¨æåã®é·ãã®å¶éãå ãã¦ã¿ãã®ã§ã軽ãã¡ã¢ãã¦ã¿ã¾ãã Attaributeã£ã¦ã®ã¯Controllerã®ä¸ã® sub default : Private { }ãsub root : Chaind('/') ...ã®ãããª:ã®å³å´ã«ãã奴ã®äºã§ãã é©å½ãªè§£èª¬ã¯Perlã®Attributesã«ã¤ãã¦ã®ãåå¼·ã§ã¾ã¨ãã¦ã¾ãã 主ã«attributesã¾ããã®å¦çã«åã£ã¦æ¸ãã¦ããã®ã§æ¬æ¥ã®å½¹å²ã¨ã¯éãæ¸ãæ¹ããã¦ãããããã¾ããã ã©ã®ã³ã¼ããã©ãã«å¨ãç©ãªã®ãã¨ãã¯ç©ºæ°å¼ãã§ææ¡ãã¦ä¸ããã Catalyst->setup Catalystã®ã¢ããªã±ã¼ã·ã§ã³ã¯ãã¾ãC
Perlã®Attributeã«ã¤ãã¦ã®ãåå¼· part2 ï½Attribute::Handlersã§ä½ããã©ã°ã¤ã³æ©æ§æè¼ã½ããï½ ãã¦ãååã§ã¯attributeã®æ±ãæ¹ã軽ãè¦ã¦ã¿ã¾ããã ãã ããããªã³ã¼ããæ¯åæ¸ãã®ã¯é¢åã§ãã ããã§Attribute::Handlersã¢ã¸ã¥ã¼ã«ã®ç»å ´ã§ãã æ¦è¦ã¨ãã¦ã¯ãç¬èªattributeã®ä½æãç°¡åã«ãã¦ããã¾ãã ãã¡ããé¢æ°ä»¥å¤ã®attributeã®ä½æãåºæ¥ã¾ãããä»åãé¢æ°ã®ã¿ã«çµãã¾ãã 詳細ã¯perldocãã¦ãã ããã åºæ¬çãªä½¿ãæ¹ãç°¡å㧠use strict; use Attribute::Handlers; sub ah_test1 : ATTR(CODE) { my($package, $symbol, $referent, $attr, $data, $phase) = @_; print "ah_test1:
Perlã®Attributeã«ã¤ãã¦ã®ãåå¼· ãã®ã¨ã³ããªã®å 容ã¯çµæ§é©å½ã§ãã ä»æ´ã§ããCatalystãªã©ã§ä½¿ããã¦ããattributeã«èå³ãæã£ãã®ã§èª¿ã¹ã¦ã¿ãã ããæ¥æ¬äººåãã¯ã¯ã¦ãªåå¼·ä¼ã®è³æãªã©ã«ãããã¾ãã ä»åã¯ãé¢æ°ã®attributeã«ã¤ãã¦ãSCALARã¨ãARRAYã¨ãHASHã¯ã¹ã«ã¼ã§ãã ãã¨ãã¢ã¸ã¥ã¼ã«ãªperlã§ã¯ãã£ã¦ã¾ãããè¶ ã·ã³ãã«ã§ãã ä»ã®Perlã§ã¯ sub foo : baz {}ã®ããã«è¨è¿°åºæ¥ã¾ãããé常ã§ã¯ã¨ã©ã¼ã«ãªã£ã¦ãã¾ãã®ã§ãã ããã©ã«ãã§å¯¾å¿ãã¦ããattributesã¯(lvalue|method|locked|unique|shared)ã®ã¿ãããã®ã§ãbazã¯å¯¾å¿ãã¦ãªãã®ã§ã¨ã©ã¼ãåºã¾ãã perldocãè¦ãã¨MODIFY_CODE_ATTRIBUTESã£ã¦é¢æ°ã§attributesã®å¦çããã¦ãããããªã®ã§ã
ã©ã³ãã³ã°
ãç¥ãã
ã©ã³ãã³ã°
ãªãªã¼ã¹ãé害æ å ±ãªã©ã®ãµã¼ãã¹ã®ãç¥ãã
ææ°ã®äººæ°ã¨ã³ããªã¼ã®é ä¿¡
å¦çãå®è¡ä¸ã§ã
j次ã®ããã¯ãã¼ã¯
kåã®ããã¯ãã¼ã¯
lãã¨ã§èªã
eã³ã¡ã³ãä¸è¦§ãéã
oãã¼ã¸ãéã
{{#tags}}- {{label}}
{{/tags}}