Perl WWW :: Scripter,从.js文件调用javascript

时间:2011-02-18 14:57:13

标签: javascript perl

主html文件包含以下javascript源

<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
<title>Hello Worlds</title>
<link rel="stylesheet" href="css/main_page.css" type="text/css"/>
<link rel="stylesheet" href="css/page_content.css" type="text/css"/>
<script type="text/javascript" src="js/jquery.js"></script>

<script type="text/javascript" src="js/util.js"></script>
<script type="text/javascript" src="js/main_page.js"></script>
<script type="text/javascript" src="js/page_content.js"></script>
<script type="text/javascript" src="js/configurator.js"></script>
<meta http-equiv="Cache-Control" content="no-cache"/>
<meta http-equiv="Pragma" content="no-cache"/>
<meta http-equiv="Expires" content="0"/>

表单的一个帖子称为javascript函数,属于page_content.js文件。

我正在尝试使用以下

来使用该函数
$scripter->get('javascript:submitForm()');

但它不起作用。请帮助我如何调用属于page_content.js文件的函数。

1 个答案:

答案 0 :(得分:1)

如果html页面(地址存储在$url中)包含(内部或外部)定义函数/过程 submitForm()的JavaScript,则可以通过以下代码执行它:

use WWW::Scripter;

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

$w->get($url);
$w->eval('submitForm();');

有关详细信息,请参阅WWW::Scripter文档。