#!/usr/bin/perl

print "Content-type: text/html\n\n";
print "あなたの<br>";
print "IPアドレスは <b>$ENV{'REMOTE_ADDR'}</b><br>";
print "ホスト名は <b>$ENV{'REMOTE_HOST'}</b><br>";
print "です。";
exit;