#!/usr/local/bin/perl

require("cgi-lib.pl")
&ReadParse(*input);

#	Ricardo Roig ext. 564
#	Cell. 954-383-2968
#	home. 954-262-6484
#	other emails roigr@scis.nova.edu, rickroig@aol.com

open (INPUT, "> /html/u/snap/selector.txt")|| Selector Error\n;	

		open (MS, "< /html/u/contests/ms.txt") || Cant create ms.txt;
		$MS = <MS>;
		close MS;
                open (MS, "> /html/u/contests/ms.txt") || Cant create ms.txt;
                $MS = $MS + 1;
                print MS $MS;
                close MS;

                print "Location: http://www.microsoft.com/ie/ad/ie4download.asp?URL=cbssshrt)", "\n\n";
exit 0;