{"width":"100%","title":"Perl\u3067&#39;&amp;{}&#39;\u3092overload\u3059\u308b","blog_url":"https://the.nyarla.jp/","author_url":"https://blog.hatena.ne.jp/nyarla-net/","type":"rich","height":"190","author_name":"nyarla-net","provider_url":"https://hatena.blog","image_url":null,"description":"\u3053\u3093\u306a\u611f\u3058\u306e\u3053\u3068\u3092\u3067\u304d\u308b\u3068\u3057\u3070\u3089\u304f\u524d\u306bConfig::Merge\u306e\u30b3\u30fc\u30c9\u8aad\u3093\u3067\u77e5\u3063\u305f\u3002 package MyClass; use overload '&{}' => sub { my $self = shift; return sub { $self->foo( @_ ) } }, fallback => 1; sub new { bless {}, shift } sub bar { 'bar' } package main; my $obj = MyClass->new; print $obj->bar; # 'bar' print $obj->(); # 'bar' FIXME","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fthe.nyarla.jp%2Fposts%2F2008%2F06%2F11%2F001307%2F\" title=\"Perl\u3067&amp;#39;&amp;amp;{}&amp;#39;\u3092overload\u3059\u308b - \u30ab\u30e9\u30af\u30ea\u30b9\u30bf\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","version":"1.0","blog_title":"\u30ab\u30e9\u30af\u30ea\u30b9\u30bf","published":"2008-06-11 00:13:07","categories":[],"url":"https://the.nyarla.jp/posts/2008/06/11/001307/","provider_name":"Hatena Blog"}