Is there any reason why this doesn't work?

#!/usr/bin/perl -wT

use CGI;

$q = new CGI;

use CGI::Cookie;
            

$cookie = new CGI::Cookie(-name =>  'foo',
                             -value   =>  'bar',
                             -domain  =>  '.corn.com');

print $q->header( -type => 'text/html', -cookie=> $cookie );

print $q->start_html;


print $q->p, "hello and $ENV{HTTP_COOKIE}"; #just checking
print $q->end_html;
[download]

basically i tryed the above and this way:

$cookie2 = $q->cookie( -name => 'aa',
                      -value=> 'bb',
            -domain => 'corn.com'.
[download]

Now the cookie only sets if I DISINCLUDE the "domain" part. I need to set a cookie at one domain for a different domain. I also only need it sent back to the one domain thats listed in "-domain=>"
EX. SET the cookie here: http://perlmonks.org for domain to use here: http://theotherperl.org
Is this possible?

thanks, Adam