#!/usr/bin/perl
use strict;
use warnings;

print "Content-Type: text/plain\n";
print "\n";

print "$ENV{REMOTE_ADDR}\n";