tie がわからない perl HTTP::Session::Store::DBM の insert で 以下のように、 sub insert { my ( $self, $key, $value ) = @_; defined(tied %{ $self->{dbm} }); # => false になる場合がある $self->dbm->{$key} = Storable::freeze $value; } $self->{dbm} に tie されたオブジェクトが undef になってる時がある。...