|
ru.nethack- RU.NETHACK ------------------------------------------------------------------- From : Igor Zinkovsky 2:5030/518.75 31 Mar 2003 04:55:04 To : Vova Penkin Subject : IP script -------------------------------------------------------------------------------- VP> видит VP> "ваш IP :###.###.###.###" не спpашивайте зачем пpосто нyжно Сорри, если не сильно по теме эхи: Perl: #!/usr/bin/perl print "Content-type:text/html\n\n"; my $userip = $ENV{'REMOTE_ADDR'}; my $realip = $ENV{'HTTP_X_FORWARDER_FOR'}; if ($realip){ $realip =~ s/ //g; my @rip = split /,/, $realip; $realip = @rip[$#rip]; if ($realip eq "unknown"){$realip = "a$userip"} print qq~ Your proxy IP: $userip <br> Your real IP: $realip ~; }else{ $realip = $userip; print qq~ No proxy detected<br> Your real IP: $realip ~; } Можно вызывать в html c помощью SSI. P.S. Только все енто не надежно. WBR, Snake No one survive... --- * Origin: Light is just a visible part of Darkness (2:5030/518.75) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.nethack/40023e87ccfe.html, оценка из 5, голосов 10
|