perlでオブジェクト指向プログラミングをしているのだが、つまんないことで、1時間30分もハマった。 .... package Foo; sub new { my $class = shift; my $h = { 'title' => shift }; bless $h, $class; } sub title { my $self = shift; $self->{'title'}; …