- or download this
$login_cookie = new CGI::Cookie(-name=>'loginID',-value=>'admin
+');
$password_cookie = new CGI::Cookie(-name=>'loginPassword',-value=>'
+go');
print header(-cookie=>[$login_cookie,$password_cookie]);
- or download this
Set-Cookie: loginID=admin; path=/ Set-Cookie: loginPassword=go; path=/
+ Date: Thu, 03 Nov 2011 16:42:20 GMT Content-Type: text/html; charset
+=ISO-8859-1
- or download this
%cookies = CGI::Cookie->fetch;
for (keys %cookies) {
print($cookies{$_});
}