OAuth::Lite::Consumerのget_request_token

my $request_token = $self->_consumer->get_request_token(
    callback_url => "$callback_uri",
) or die $self->_consumer->errstr;

$callback_uri が $VAR1 = bless( do{\(my $o = 'http://localhost/auth/zaim/callback')}, 'URI::http' ); とかだったりするとおかしいことになるので、""で囲んであげる必要がある。もしくは$callback_uri->as_string