This is an old revision of the document!
#!/usr/bin/perl -wT use CGI qw(:standard); print "Content-type: text/html\n\n"; #print "<pre>\n"; if ($ENV{HTTP_X_FORWARDED_FOR}){ print $ENV{HTTP_X_FORWARDED_FOR}; } else { print $ENV{REMOTE_ADDR}; } print "\n";
Try it here !!
curl ip.k2patel.in