my $cgi = CGI->new();
my $cookie = $cgi->cookie( -name=>$self->name, -value => 1, -expires=> '-1d');

##</code><code>##

my $cgi= CGI->new();
my $cookie = $cgi->cookie( -name=>$name, -value => 1, -expires=> '-1d');
print $query->header(-cookie => $cookie, type => 'text/html');

print "This text is sent to the browser, and at the same time the cookie is cleared\n";


##</code><code>##

delete $ENV{HTTP_COOKIE};