Help for this page

Select Code to Download

Select or download this

$the_cookie = cookie(-name=>'animals',
     -value=>\%zoo,
     -expires=>'+1h');

Select or download this

my ($usr,$pw);
if ($ENV{'HTTP_COOKIE'}) { # from cookie
...
                                       -value=>$pw,
                                        -expires=>'+1h');
print $input->header(-cookie=>[$cookie_usr,$cookie_pw]);