#!/usr/bin/perl -w require 5.004; print "Content-type: Text/Plain;\n\n"; print $ENV{'REMOTE_ADDR'};