or download this
$cookie_jar->extract_cookies( $response )
The extract_cookies() method will look for Set-Cookie: and Set-Coo
+kie2: headers in the HTTP::Response object passed as argument. Any of
+ these headers that are found are used to update the state of the $co
+okie_jar.