HTTP요청 스크립트(ActivePerl) form-data
programming/perl 2009. 11. 19. 11:59 | use HTTP::Request::Common qw(POST);
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
my $req = POST 'http://192.168.1.157',Content_Type => 'form-data',Content => [ search => 'www', errors => 0 ];
$ua->request($req);
o>_<o
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
my $req = POST 'http://192.168.1.157',Content_Type => 'form-data',Content => [ search => 'www', errors => 0 ];
$ua->request($req);
o>_<o
'programming > perl' 카테고리의 다른 글
| HTTP 파일업로드(Perl) (0) | 2009.12.30 |
|---|---|
| web login dictionary attack (0) | 2009.12.03 |
| apache log shooter(GET) (0) | 2009.10.11 |
| WireShark HTTP파싱 스크립트 (0) | 2009.09.30 |
| HTTP요청 스크립트(ActivePerl) (0) | 2009.09.30 |