Select Code to Download

<input type="text"  name="username"/>
<input type="password" name="password"/>

my $cgi = CGI->new();
my $sid = $cgi->cookie('login');
...
} else { 
  print $cgi->header(-cookie=>$cookie);
 }