Re: Remote web form post

[linuxer]

in reply to Remote web form post

Where do you define and fill $res?

That variable is never defined or filled and therefore is undefined.

Maybe you should consider to use strict and warnings.

Addendum:

I had another look at your script and think, there are more flaws than the one I previously mentioned.

• $req should contain a HTTP::Request object; so you should create one.
• POST 'http://...' is missing the correct operator between POST and the URL string
• $ua->request() returns a response object; you should give the variable a better fitting name than $request.

[Anonymous Monk]

is missing the correct operator between POST and the URL string

Sure its not :)

use DDS;
use HTTP::Request::Common qw(POST);
Dump( POST 'http://example.com', [ qw' username joe password joe ' ] )
+;
__END__
$HTTP_Request1 = bless( {
                   _content => 'username=joe&password=joe',
                   _headers => bless( {
                                 "content-length" => 25,
                                 "content-type"   => 'application/x-ww
+w-form-urlencoded'
                               }, 'HTTP::Headers' ),
                   _method  => 'POST',
                   _uri     => \do { my $v = 'http://example.com' }
                 }, 'HTTP::Request' );
bless( $HTTP_Request1->{_uri}, 'URI::http' );

I agree with the rest of your words

[linuxer]

Ah, thank you for the hint. I tested with HTTP::Request, which I prefer...

I thought of POST being a bareword and not an exported function from HTTP::Request::Common.

Well, now I see, I don't like that style... ;-)