Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^3: LWP::USERAGENT - POST through basic authentication

by Khen1950fx (Canon)
on Oct 12, 2011 at 14:54 UTC ( #931031=note: print w/ replies, xml ) Need Help??


in reply to Re^2: LWP::USERAGENT - POST through basic authentication
in thread LWP::USERAGENT - POST through basic authentication

Where do I put the $args

You don't. In some of the Net modules, you can use a %args for options, but since this is LWP, there's a slightly different way to do that. For example, in the example that I gave you, I tried to keep it simple, step-by-step. Lets look at another way to do it.

$req = HTTP::Request->new(POST => $self->{'baseurl'}, $args);

First, you're missing a shebang line( #!/usr/bin/perl ) and strictures. You also need to declare your variables with my. Another problem is your use of $self->{'baseurl'}---What's that? You didn't declare $self nor $args. Putting it altogether:
#!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; #using http://www.example.com for our $url my $req = HTTP::Request->new(POST => 'http://www.example.com');
Note that the url should be absolute; also, I dropped $self->{'baseurl'} and $args because they weren't necessary and didn't do anything. Now you know where to put $args:).


Comment on Re^3: LWP::USERAGENT - POST through basic authentication
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://931031]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (5)
As of 2014-07-13 05:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (247 votes), past polls