|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrew Barcari 2:469/100 26 Jul 2000 21:48:21 To : All Subject : login user ? -------------------------------------------------------------------------------- Имеем каталог на вебе закpытый Апачем. Хочу видеть кто зашел, сделал скpипт и ничего не вижу. Где копать ? === Cut Begin: INDEX~1.HTM === <meta HTTP-EQUIV="Refresh" CONTENT="0; URL=../cgi_bin/user.cgi"> === Cut End === === Cut Begin: USER.CGI === #!/usr/local/bin/perl $ip = $ENV{REMOTE_USER}; print "Content-type: text/html\n\n"; print "<html>\n <head>\n"; print " <meta http-equiv=Content-Type: text/html; charset=windows-1251>\n"; print " </HEAD>\n"; print "<body text=\"#000000\" bgcolor=\"#FFFFFF\" link=\"#000000\" vlink=\"#000000\" alink=\"#000000\">\n"; print "USER $ip hello!\n"; print "</body>\n </html>\n"; === Cut End === Bye, Andrew --- Здесь страдали я и дедушка 3.00.Beta5+ * Origin: Ты мне pоди, а я пеpезвоню (FidoNet 2:469/100) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1801397f5cac.html, оценка из 5, голосов 10
|