|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Chuprina 2:5020/400 30 Apr 2002 11:08:12
To : Alex Bachin
Subject : Re: Люди, будбте бдительны!
--------------------------------------------------------------------------------
Здравствуй, Alex Bachin.
AB> Тут от нечего делать решил проверить классиков
AB> перловых скриптов на вшивость :)))
AB> 1. гостевая книга от www.worldwidemart.com
AB> конечно, этого автора считают очень плохим скриптописателем,
AB> но его скрипты распространены в инете
AB> Итак: имеем конструкцию
AB> $value =~ s/<!--(.|\n)*-->//g;
AB> if ($allow_html != 1) {
AB> $value =~ s/<([^>]|\n)*>//g;
AB> }
AB> Что получится при дефалтовом параметре $allow_html=1
AB> и вводе в поле сообщения строки
AB> <<!-- -->!--#exec cmd="ls /">
AB> предоставляется вдумчивому читателю
AB> Волосы дыбом встают
Hу, покажут тебе /. Вот если на той машинке есть файлы, которые тому серверу
можно поудалять, то да, но ты сам сказал "считают очень плохим
скриптописателем".
AB> 2. CGI/Perl Cookbook
AB> http://www.cgi-perl.com/
AB> Hебольшое издевательство над параметрами скрипта
AB> FileSeek, например
AB> http://www.cgi-perl.com/programs/FileSeek/Demo/FileSeek.cgi?head=|ls%20..../
AB> /....//....//....//....//etc| и вуаля! вместо команды ls можно подставить и
AB> более интересные командочки :)))
Опять же, при том же условии... Впрочем, баг я бы зарепортил.
--
Artem Chuprina
Communiware.net
RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
--- ifmail v.2.15dev5
* Origin: Leninsky 45 home network (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
