WWW :: Scripter JE - MouseEvent'不支持

Question

我試圖自動化具有JavaScript的Web應用程序。

我正在使用WWW :: Scripter。

點擊一個鏈接，我使用下面的代碼，但似乎不支持MouseEvent。

$wi->eval ('var theEvent = document.createEvent("MouseEvent");'); 
$wi->eval ('theEvent.initMouseEvent("click", true, true, window, 0, 0, 0, 0, 0, false, false, false, false, 0, null);'); 
$wi->eval ('var element = document.getElementsByTagName("li")[3].getElementsByTagName("a")[0];'); 
$wi->eval ('element.dispatchEvent(theEvent);'); 

我們有其他方法可以實現嗎？

Answer 1

use WWW::Scripter; 

$wi = new WWW::Scripter; 
$wi->use_plugin('JavaScript'); 

$wi->get('http://...'); 

$wi->follow_link(url => 
    $wi->eval(
    'document.getElementsByTagName("li")[3].getElementsByTagName("a")[0].href' 
) 
);