-1

如何调用在 html 文件中返回数据“文本”类型的 perl 脚本。发布 perl 脚本以供参考。必须在 index.html 中调用此脚本,所以如何做到这一点

#!/usr/bin/perl -w  

use CGI;  

my $cgi = CGI->new;  
my $remote = $cgi->remote_host();  

my $AB = "16.108";  
my $CD = "16.214";  
my $EF = "10.99";  
my $GH = "10.243";  
my $XY = "10.179";  

my @remote_ip_values = split(/\./, $remote);  

my $remote_ip = $remote_ip_values[0] .".". $remote_ip_values[1];  

print "Content-type: text/html\n\n";  
print "document.write(\"<style>\\n\");\n";  
print "document.write(\"font color:red;\\n\");\n";  


if ($remote_ip eq $AB)  
{  
print "document.write(\"SUCCESSFUL\");\n";  

}  
 else  
{  
print "document.write(\"TEST\");\n";  
}  
exit;  
4

1 回答 1

-1

我正在编辑我的答案,因为我现在了解您要做什么。我已经建立了一个简单的例子,它将从“另一个网站”加载内容——对你来说,这将是你的 Perl CGI。

这个 HTML 使用了一些简单的 JQuery。我正在加载以下 HTML 页面http://chocksaway.com/tester.html并将内容复制到“测试” div 中:

<!DOCTYPE HTML>
<html>
    <head>
        <title>Loader</title>
    </head>
    <body>
        <div id="test"></div>
            <script type="text/javascript" src="http://code.jquery.com/jquery-1.9.1.min.js"></script>
            <script type="text/javascript">
                $(document).ready(function() {
                    $('#test').load('http://chocksaway.com/tester.html');
                });
            </script>
    </body>
</html>

http://chocksaway.com/tester.html具有以下 HTML:

<html>
    <header></header>
    <body> 
        this is a test so there
    </body>
</html>

如果你打开http://chocksaway.com/tester2.html,你会看到:

this is a test so there

将“ http://chocksaway.com/tester2.html ”替换为您的 Perl CGI 的 URL

于 2017-06-25T10:35:40.543 回答