All pastes #2133206 Raw Edit

Umar

public text v1 · immutable
#2133206 ·published 2012-03-28 13:12 UTC
rendered paste body
#!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";