Newbie help - My cookies won't bake?

[Jeff Armstrong]

Revered Chefs,

Please forgive a mere mod_perl kitchen-hand, undergoing early cookie 
training... I have the following cookie code, but no cookies come 
back when I refresh, and I don't see any $HTTP_COOKIE in %ENV. 
$cookies ends up as a hash ref pointing to an empty hash.

I have the following in my httpd.conf:
  PerlWarn On
  PerlTaintCheck On
  PerlFreshRestart On
  PerlInitHandler Apache::Reload
  PerlSetVar ReloadAll On
  <Files *.pl>
    SetHandler perl-script
    PerlHandler Apache::Registry
    PerlSendHeader Off
    Options +ExecCGI
  </Files>


Help?? TIA

Jeff

# As you will note, this highly original recipe was lifted unchanged 
# from Delia Smith's 'How to Boil Eggs for Breakfast'.
#------------------------------------------------
# This is the cookie dough that don't want to bake
use strict;
require "dumpvar.pl";
use Apache;
use Apache::Cookie;

# read in the cookie if this is an old session
my $r = Apache->request();
my $cookies = Apache::Cookie->fetch;

my $sent = '';
if (!$cookies->{foo} ) {
  $sent = 'sending cookie';
  my $cookie = Apache::Cookie->new(
                      $r,
                      -name    =>  'foo',
                      -value   =>  'bar',
                      -expires =>  '+1D',
                      -domain  =>  undef,
                      -path    =>  '/',
                      -secure  =>  undef,
                     );
  
  $cookie->bake;
} else {
  $sent = 'received cookie';
}
$r->content_type("text/html");
$r->send_http_header;

print "$0 $sent", "<HR>";
main::dumpValue(\$cookies);
print "<HR>", $r->as_string, "<HR>";
map { print "&nbsp;&nbsp;$_ => '$ENV{$_}' <BR>\n"; } sort keys %ENV;
#------------------------------------------------