weakenってなんじゃらほいと思ったら、 Scalar::Utilのメソッドだった。 # For on-demand data $c->request->{_context} = $c; $c->response->{_context} = $c; weaken( $c->request->{_context} ); weaken( $c->response->{_context} ); 参照をよわくするや…