#!c:\perl64\bin\perl.exe

print "content-Type: text/html\n\n";

$ip = $ENV{'REMOTE_ADDR'}; 
$title = "My first cgi/perl script";

print "<HTML><HEAD>\n<TITLE>$title</TITLE>\n</HEAD>\n";

print "<BODY>\n";

print "<h1>welcome $ip</h1>\n";


print"<BODY></HTML>\n";