我需要解析由 ASP 操作 (LoadDialog) 生成的列表,但我不知道如何完成它。如果我执行以下操作,我只会得到一个空的 HTML 文件。
#!/usr/bin/perl -w
#
#
use strict;
use WWW::Mechanize;
use HTTP::Cookies;
my $url = "http://MYURL/LOGIN";
my $appurl = "http://MYURL/SOME.asp";
#SOME.asp calls http://MYURL/SOME.asp?Action=LoadDialog" to get results
my $username = 'username';
my $password = 'password';
#login to site
my $mech = WWW::Mechanize->new();
$mech->cookie_jar(HTTP::Cookies->new());
$mech->get($url);
$mech->form_name('login');
$mech->field(UserName => $username);
$mech->field(Password => $password);
$mech->click();
# get results from LoadDialog (?!)
$mech->get($appurl);
my $app_content = $mech->content();
print "$app_content\n";
Firebug 告诉我?Action=LoadDialog
上面提到的 URL 正在调用它,但 Mechanize 没有意识到它(猜测)。
简单地$myappurl
更改http://MYURL/SOME.asp?Action=LoadDialog
为也给了我一个空的 HTML 文件。
有没有机会获得 ASP 生成的内容?我不能使用任何其他“运行浏览器”的 Perl 模块,我需要找到一个可在 shell 中使用的解决方案。
提前致谢,马利