Уязвимости скриптов Perl

[root]

Вопрос такой - Как заставить вывести на экран не результат работы скрипта а его исходный код?

 

[Vah]

ну ты можешь написать автору скрипта чтоб он его тебе выслал на почту...... возможно, что очень мало вероятно ты получишь исходник этого скрипта.....

 

[y00]

Вопрос такой - Как заставить вывести на экран не результат работы скрипта а его исходный код?

Если я правильно понял суть вопроса, то нужно провести аудит используемых скриптов, на наличие "дырок" с кривыми параметрами. Т.е. ситуации, когда скрипт не проверяет приходящих снаружи данных и суёт их куда попало. А попало в нашем случае это операция открытия файла (open, sysopen) или функция eval. Такие ошибки находятся путём научного тыка по тупым признакам (name.pl?news=../new/super/news.db, если скрипт уязвим, то после попытки сделать name.pl?name.pl мы в идеале должны получить сырец файла name.pl).

А ещё можно взять в руки обычный CGI сканер типа nikto и натравить его на исследуемый сервер, в ожидании результата почитывая УК РФ и не забывая про отвественность

 

[MASTERSIBERIA]

I'm no expert, but from what I've gathered, Perl has had its share of security concerns over the years. It's essential to keep your scripts up to date and use secure coding practices to avoid potential vulnerabilities. Can anyone recommend some good resources for learning Perl security?