%cookie = fetch CGI::Cookie if $ENV{HTTP_COOKIE}; $cookie1 = cookie( -name=>"host", -value=>$host, -expires=>"+7d" ); $cookie2 = cookie( -name=>"xronos", -value=>$xronos, -expires=>"+7d" ); $cookie3 = cookie( -name=>"visits", -value=>cookie(visits)+1, -expires=>"+7d" );