Re: [PerlChina] 如何用Perl来实现像Opera浏览器的主要功能

不知道这东西成不。
http://seleniumhq.org/

在 2011-9-3，上午11:43， truncatei 写道：

> 曾经看到这么一个包，希望对你有帮助
>
> http://search.cpan.org/~corion/WWW-Mechanize-Firefox-0.55/lib/WWW/Mechanize/Firefox.pm
>
> $mech->eval( $str [, $env [, $document]] )
>
> my ($value, $type) = $mech->eval( '2+2' );
>
> Evaluates the given Javascript fragment in the context of the web
> page. Returns a pair of value and Javascript type.
>
> This allows access to variables and functions declared "globally" on
> the web page.
>
>
>
> 2011/9/2 Morya Feng <morya@is-coder.com>:
>> 如果不限定语言的话，用别的语言写一个工具，只是用perl取得
>> 一下返回值和返回一些具体的执行结果字符串是不是可行？
>> 比如，用python + PySide/PyQt + QtWebkit
>> 在 2011年9月2日 上午10:18，liseen <liseen.wan@gmail.com>写道：
>>>
>>> Hi, all
>>> 用QtWebkit 吧， 用c++ 写， 接口很简单， 执行js什么的都没有问题。
>>> xunxin
>>> 2011/9/2 eexpress <eexp01@gmail.com>
>>>>
>>>>
>>>> 兼容测试？实际用浏览器测试好些。WWW::Mechanize不支持js，常规抓网页/提交内容，倒是顺手。Opera的菜单可以调用perl脚本，传递些Opera内部参数，这可以的。
>>>>
>>>> 在 Thu, 01 Sep 2011 22:04:47 +0800，Jeova Sanctus Unus
>>>> <jeova.sanctus.unus@gmail.com> 写道:
>>>>
>>>>> 按需写perl,该执行js,就找个模块来跑嘛，;)
>>>>> 在 2011-9-1 下午8:09，"洋葱" <fine102@gmail.com>写道：
>>>>>>
>>>>>> 请教一个Perl方面问题，生产中有需要使用Perl去测试一大堆手机网站，想判断这些网址是否最后都可以成功打开，并且判断返回的Content长度
>>>>>> 都超过1024字节。
>>>>>>
>>>>>> 目的:可以使用脚本对网站进行测试，如果网址有302或301跳转会自动跟进，如果网站有onenterforward或ontimer这种页面内的跳
>>>>>> 转也能够自动跳转，直至跟进到最后的页面，返回最后页面的status_line和content
>>>>>>
>>>>>> 但是如果要兼容这些网站，就会存在一些问题，
>>>>>> 1、比如网站的302 301Location要了识别并跟进【这个还好解决】
>>>>>> 2、如页有些网站的跳转是通过页面的refresh或者一些onenterforward、ontimer等等各种各样的花样百出的来实现的，其实如果
>>>>>> 想把所有网站都兼容好，那相当于写了一个Opera浏览器了。
>>>>>>
>>>>>> Perl是否可以直接调取现成的包，来实现这个功能，我在网上找过了，没有发现有这么功能的模块。我又想过装个Linux版本下的Opera，看是否有
>>>>>> 接口供调用，发现也没有这个功能。大家有什么好建议吗？
>>>>>>
>>>>>> --
>>>>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>>>>>> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
>>>>>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>>>>>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>>>>>>
>>>>>
>>>>
>>>>
>>>> --
>>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>>>> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
>>>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>>>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>>>>
>>>
>>>
>>>
>>> --
>>> - xunxin 万�新
>>> - 技术部搜索组工程师
>>> - Tel: 86-10-5760 3320
>>>
>>> - Mobile: 86-13811636901
>>>
>>> --
>>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>>> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
>>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>>
>> --
>> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
>> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
>> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
>> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>>
>
>
>
> --
> 如果觉得无聊，您不妨访问Google Reader消遣 https://www.google.com/reader/view
> 要尝试黑版本Google，请访问 http://tinyurl.com/yk3yp7j
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
> 要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
> 要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
> 若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。