%cookies = fetch CGI::Cookie;
$id = $cookies{'ID'}->value;