2008-12-01から1日間の記事一覧
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 されたオブ…
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 されたオブ…
