Perl でオブジェクトのアトリビュートへのアクセサを書くとしたら、たとえば以下ように、アクセスしたいアトリビュートの分だけアクセサをひたすら書きまくることもできる。 package MyClass; sub new { my $class = shift; bless { foo => 'aaa', bar => 'b…

機能もコードも非常にショボくてだめだめな感じの拙作 greasemonkey スクリプトの Hatena Rolling ですが、自分的には非常に便利で、愛用していたりします。先日、サーバが死んだことにともない、そのスクリプトも消え失せてしまってたかと思いきや、Userscr…