|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Oleg Shumsky 2:5055/83 26 Feb 2002 09:20:06 To : Igor Okunev Subject : Re: Заголовок ответа -------------------------------------------------------------------------------- >> $arg =~ s/\.\.//g; >> $argorig = $arg; >> >> $arg =~ s/^\///g; >> $archive = (split ':', $arg)[0]; >> $file = (split ':', $arg)[1]; >> >> $afile = sprintf "$basepath/$archive"; IO> а как насчет, $ARGV[0] = '.%s./.%s./autoexec.bat:', например :) А вообще, как избежать подобных дыр? Какие еще могут быть символы подобного рода? А то я тоже сделал проверку на .. и все. А сейчас проверил с твоими данными - так вышел в корень html ресурса. Дальше е выходит, но все равно так быть не должно. Log off. 8:15am up 15:28, 3 users, load average: 0.16, 0.16, 0.13 --- GoldED+/LNX 1.1.4.3 * Origin: Если бы взгляд убивал... (2:5055/83) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/18673c7b6fe3.html, оценка из 5, голосов 10
|