function setreferer() {
   var s = window.location.search;
   var pos = s.indexOf('referer=');
   var value;
   if (pos != -1) {
   
	   var expdate  = new Date();
	   expdate.setDate(expdate.getDate()+45);
           expdate.setHours(23);
           expdate.setMinutes(59);
           expdate.setSeconds(59);
           var end = s.indexOf('&',pos);
           if ( end == -1) end = s.length;
           value = unescape(s.substring(pos,end))+';path=/;expires='+expdate.toGMTString();
           document.cookie  = value;
                                                                                                                                                                                                     
   }
   if (!getreferer()) {
         var ref = document.referrer;
	 if (ref) {
	    var m = ref.match(/([a-z0-9]+)\.(dk|com|se|no|de|fr|nl|co\.uk|uk|at|ch)/); 
            if (m) document.cookie  = 'referer='+m[1]+';path=/';
         }
   }                                                                                                                                                                                                  
}
                                                                                                                                                                                                     
function getreferer() {
        var cookies = document.cookie;
        var pos = cookies.indexOf('referer=');
        var value;
        if (pos != -1) {
           var start = pos+8;
           var end = cookies.indexOf(';',start);
           if ( end == -1) end = cookies.length;
           value = unescape(cookies.substring(start,end));
        }
        return value;
}
setreferer();



