$i = 1;
    while ($url[$i]) {
        if ($ENV{'HTTP_USER_AGENT'} =~ /$UserAgent[$i]/){
            if(!$inc[$i]){print "Location: $url[$i]\n\n";}
            else {
                print "Content-type: text/html\n\n";
                open (IN,$url[$i]);
                while(<IN>){print $_;};close(IN);
                exit;
            }
        };
        $i++;
    }