Help for this page

Select Code to Download


  1. or download this
      my $ua=LWP::UserAgent->new(keep_alive=>1);
 my $getline='http://place.to.go.to/'; 
...
                              ,HTTP::Headers->new('Cookie'=> 'JSESSION
+ID=F97AC6F5AD33D54D0C06F4CBF0230C43' )
                              );
  my $request = $ua->request ($req);
  2. or download this
      my $cookie_jar_obj = HTTP::Cookies->new(ignore_discard=>1,hide_cooki
+e2=>1);
  my $ua=LWP::UserAgent->new(keep_alive=>1);
...
  my $request = $ua->request ($req);
  if (some-test-for-done){ $repeatme=0;} 
  }