%cookies = CGI::Cookie->fetch; $username = $cookies{'reguser'}->value; $password = $cookies{'regpass'}->value; $regtype = $cookies{'regtype'}->value;