my @cookies = map { $cgi->cookie(-name => $_ -value => "", -expires => '-1d') }
   qw( login password id CGISESSID );

print $cgi->redirect(
   -cookie => \@cookies,
   -uri    => $cgi->url(),
);