#!/usr/bin/perl
use CGI 'header';
print header('text/plain');
print $ENV{REMOTE_ADDR};