Perl的Java机器人类(java.awt.Robot)是否相同?
或者,您可以使用WWW :: Mechanize模块来创建代理,就像我们在这里工作一样.我们有一个名为AppMon的工具,它实际上只是围绕Mechanize的一个戏剧化的包装器.
Mechanize模块允许您使用看起来像这样的脚本:
use WWW::Mechanize; my $Agent = WWW::Mechanize->new(cookie_jar => {}); $Agent->get("http://www.google.com/search?q=stack+overflow+mechanize"); print "Found Mechanize" $Agent->content =~ /WWW::Mechanize/;
并将导致输出"Found Mechanize".这是一个非常简单的脚本,但请放心,您可以很好地与表单进行交互.
您也可以转移到Ruby并使用Watir或Selenium作为另一种选择,尽管不是那么有趣(在编码方面)或自动化.Selenium有一个firefox扩展,对于创建selenium脚本非常有用,并且可以在它支持的各种语言之间进行更改,这在自动化方面非常广泛.
虽然我没有太多机会玩它,但也有大多数语言的webdriver包,而Perl也不例外.
硒::远程::驱动程序