Select Code to Download

my $cookie = $cookie1."\nSet-Cookie: $cookie2"."\nSet-Cookie: $cookie3
+\nSet-Cookie: $cookie4";

my $cookie = [ $cookie1, $cookie2, $cookie3, $cookie4 ];

my @cookies;
push @cookies, $cgi->cookie(-name => "login",     -value => "", -expir
+es => '-1d');
...
   -cookie => \@cookies,
   -uri    => $cgi->url(),
);

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