use HTTP::Cookies;
 $cookie_jar = HTTP::Cookies->new;

##</code><code>##

$ua->cookie_jar([$cookie_jar])

##</code><code>##

$cookie_jar->extract_cookies($response);
$cookie_jar->set_cookie($version, $key, $val, $path, $domain, $port, $path_spec, $secure, $maxage, $discard, \%rest)