my $c7 = OAuth::Lite::Consumer->new( consumer_key => q{consumer}, consumer_secret => q{dummy}, _nonce => q{10369470270925}, _timestamp => q{1236874236}, ); my $req7 = $c7->gen_oauth_request( method => 'PUT', url => q{http://www.example.com}, content => q{Hello World!}, headers => [ 'Content-Type' => q{text/plain} ], );