bless($args, $class) is a bad practice - Islands in the byte stream (legacy)ã•ã„ãん散見ã•ã‚Œã‚‹ä»¥ä¸‹ã®ã‚ˆã†ãªã‚³ãƒ¼ãƒ‰ã¯æ‚ªã„コードã§ã™ã€‚ # usage: Foo->new({ age => 42 }) sub new { my($class, $args) = @_; return bless $args, $class; } ãã‚Œã¯ã€ãƒãƒƒã‚·ãƒ¥ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã¨æƒ³å®šã•ã‚Œã‚‹$argsã®ãã®ã¾ã¾ã¤ã‹ã£ã¦ã„ã‚‹ãŸã‚ã€å¼•æ•°ã¨ã—ã¦ãƒãƒƒã‚·ãƒ¥ãƒªãƒ†ãƒ©ãƒ«ä»¥å¤–ã®ä½•ã‹ã‚’渡ã™ã¨äºˆæœŸã—ãªã„動作を引ãèµ·ã“ã™ã¨ã„ã†ç‚¹ã§ã™ã€‚ ãŸã¨ãˆã°ã€ä»¥ä¸‹ã®ã‚ˆã†ãªä½¿ã„æ–¹ã¯å•é¡Œã‚’引ãèµ·ã“ã—ã¾ã™ã€‚ my %args = (age => 20); my $o1 = Foo->new(\%args); my $o2 = Foo->new(\%args); # ã“ã“㧠$o1 㨠$o2 ã¯åŒã˜ã‚ªãƒ–ジェクトã«ãªã£ã¦ã—ã¾ã† ã“ã®ã‚ˆã†ãªå ´åˆã€$argsã¯ã‚³ãƒ”ーã™ã¹ãã§ã™*1。ã¾ãŸã¤ã„ã§ã«ãƒãƒƒã‚·ãƒ¥ãƒªãƒ•ã‚¡ãƒ¬ãƒ³ã‚¹ã§ã¯ãªãkey-value
Lucb1e.com :: Cookieless Cookies
{{#tags}}- {{label}}
{{/tags}}