Select Code to Download

my $r = Apache->request;

...
    path => '/', 
    expires => '+8h',
)->bake;

my $cookie = Apache::Cookie->fetch;

...
print "<h3>name = $name</h3>\n";
print "<h3>value = $value</h3>\n";