A cookie is just another header. A cookie jar is a collection of cookies that the browser can search by the page it is going to and select the right ones to send back

if you wanted to just supply a single cookie and not care about any cookies you get back you could try this 

  my $ua=LWP::UserAgent->new(keep_alive=>1);
 my $getline='http://place.to.go.to/'; 
 my $req = new HTTP::Request (GET => $getline
                              ,HTTP::Headers->new('Cookie'=> 'JSESSION
+ID=F97AC6F5AD33D54D0C06F4CBF0230C43' )
                              );
  my $request = $ua->request ($req);

[download]
When i want to use a "stand alone" cookie-jar i do something like this 
  my $cookie_jar_obj = HTTP::Cookies->new(ignore_discard=>1,hide_cooki
+e2=>1);
  my $ua=LWP::UserAgent->new(keep_alive=>1);
  $ua->cookie_jar( $cookie_jar_obj ); 
  $cookie_jar_obj->set_cookie(0, 'JSESSIONID', 'F97AC6F5AD33D54D0C06F4
+CBF0230C43'
                             , '/', 'place.to.go.to', 80
                             , '', '', 14400000, 0 
                             ); 
  $cookie_jar_obj->set_cookie(0, 'LoginUsername', 'Operator'
                             , '/', 'place.to.go.to', 80
                             , '', '', 14400000, 0 
                             ); 
  $cookie_jar_obj->set_cookie(0, "LoginPassword", 'Operator'
                             , '/', 'place.to.go.to', 80
                             , '', '', 14400000, 0 
                             ); 
$repeatme=1; 
while ($repeatme) { 
  my $getline='http://place.to.go.to/'; 
  my $req = new HTTP::Request (GET => $getline); 
  my $request = $ua->request ($req);
  if (some-test-for-done){ $repeatme=0;} 
  }

[download]
In both cases those are just cut and pastes from existing code and not tested as they appear here. YMMV

In reply to Re^3: what is the correct way to set cookie in LWP::UserAgent by huck
in thread what is the correct way to set cookie in LWP::UserAgent by Eroln

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.