#!/usr/bin/perl

print "Content-type: text/plain\n\n",
    $ENV{'REMOTE_ADDR'}, "\n";

exit 0;