Re: Re: lwp::simple basic question about webbing

This might not be directly to you merlyn but maybe a general question. I have a real hard time reading perl directions :). I did notice that my cookies file had been added to by the website I am trying to use. So I would like to somehow show this up to the server I am going into. I noticed this as possibly what I need to use but don't understand how. This is a part of LWP::UserAgent

$ua->cookie_jar([$cookies])

Get/set the HTTP::Cookies object to use. The default is to have no cookie_jar, i.e. never automatically add "Cookie" headers to the requests.

I have four lines of stuff from this website. Would I put them into an array, would I put the cookies in $cookies and have many of the above lines of code, or how might I go about showing them my cookies that the have set?

LeGo

Comment on Re: Re: lwp::simple basic question about webbing Download Code

Replies are listed 'Best First'.
LWP::UserAgent & HTTP::Cookies by dkubb (Deacon) on Jan 18, 2001 at 13:27 UTC
If you are using Netscape, you can use HTTP::Cookies to have your LWP::UserAgent client read and write from your actual Netscape cookie files without needing to cut and paste the cookie string into your code: `#!/usr/bin/perl -w use strict; use HTTP::Cookies; use LWP::UserAgent; #Set path to your Netscape Cookie files my $cookie_jar = HTTP::Cookies::Netscape->new( File => "$ENV{HOME}/.netscape/cookies", AutoSave => 1, ); #Create a User Agent, and tell it to store cookies my $ua = LWP::UserAgent->new; $ua->cookie_jar($cookie_jar); #...` [download] If you aren't using Netscape, then you will have to explicitly set the cookies in the $cookie_jar object, which you can do using the HTTP::Cookies::set_cookie() method.	[reply] [d/l]

Replies are listed 'Best First'.

LWP::UserAgent & HTTP::Cookies
by dkubb (Deacon) on Jan 18, 2001 at 13:27 UTC

If you are using Netscape, you can use HTTP::Cookies to have your LWP::UserAgent client read and write from your actual Netscape cookie files without needing to cut and paste the cookie string into your code:

#!/usr/bin/perl -w

use strict;
use HTTP::Cookies;
use LWP::UserAgent;

#Set path to your Netscape Cookie files
my $cookie_jar = HTTP::Cookies::Netscape->new(
  File     => "$ENV{HOME}/.netscape/cookies",
  AutoSave => 1,
);

#Create a User Agent, and tell it to store cookies
my $ua = LWP::UserAgent->new;
$ua->cookie_jar($cookie_jar);
#...
[download]

If you aren't using Netscape, then you will have to explicitly set the cookies in the $cookie_jar object, which you can do using the HTTP::Cookies::set_cookie() method.

[reply]
[d/l]