The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
TEODESIAN / Selenium-Remote-Driver-1.27 / t / www / cookies.html 
<html>
    <head>
        <title>Testing cookies</title>

        <script type="text/javascript">
            function setCookie(NameOfCookie, value, expiredays) {
                var ExpireDate = new Date ();
                ExpireDate.setTime(ExpireDate.getTime() + (expiredays * 24 * 3600 * 1000));

                  document.cookie = NameOfCookie + "=" + escape(value) +
                  ((expiredays == null) ? "" : "; expires=" + ExpireDate.toGMTString());
            }
        </script>
    </head>
    <body onload="setCookie('foo1', 'bar1', 365); setCookie('foo2', 'bar2', 365);" />
</html>