Metacat

  # set cookies on UA object

  my $cookie_jar = $self->{'cookies'};

  $$cookie_jar->add_cookie_header($request);

  #print "request: " . $request->as_string();

  my $response = $userAgent->request($request);