Я пишу небольшой инструмент Perl, который должен помочь мне ускорить некоторые процессы во время слепой атаки SQL-инъекцией (это этический инструмент. Это моя работа).
Мой скрипт управляет HTTP-запросами уже , закодированными с помощью шестнадцатеричных значений (% xx).
Поэтому мой запрос кодируется дважды, когда я использую HTTP::Request
для отправки его в веб-браузер.
Я использую такой код:
my $ua = LWP::UserAgent->new;
my $httpreq = new HTTP::Request GET => 'http://192.168.0.1/lab/sqli.php?id=1%20and%20(select%20ascii(substring(user,3,1))%20from%20mysql.user%20limit%201)>100%23';
my $res = $ua->request($httpreq)
Как отключить кодировку perl URL внутри моего запроса?