0

私のindex.htmlがperlハンドラを呼び出してindex.html内にデータテーブルをロードできる方法があるかどうか疑問に思っていました。JQuery はありませんが、Javascript は使用できます。これについてどうすればいいですか?今のところ、perl ハンドラーで html を印刷しているだけですが、必要がなければそれを行うのは本当に好きではありません。基本的に、perl cgi ハンドラーからデータを取得し、そのデータを取得して html データテーブルにロードする方法はありますか。ヒント/アドバイスをありがとう。

私が今やっていることは、次を使用してハンドラーを呼び出すことです:

    <form action="http://myExampleHandler.pl.cgi" method="get">

       <input type="submit" value="GO" />
    </form>

パール:

 $dtd =
        "-//W3C//DTD XHTML 1.0 Transitional//EN\"
    \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd";

 print "Content-type: text/html\n\n";

 print( start_html( { dtd => $dtd,
                 title => "Database mySQL example" } ) );
 print "Ok let\'s start...<p>";

 $dbh = DBI->connect('dbi:mysql:MyDbName','MyUserName','MyPassword')
or die "Connection Error: $DBI::errstr\n";
$sql = "select * from Animal";
$sth = $dbh->prepare($sql);
$sth->execute
or die "SQL Error: $DBI::errstr\n";

#@data = $sth->fetchrow_array();

#print header;
#print "Content-Type: text/html\n\n";

print "<table width=\"900\"> \n";

print "<tr><td></td><td>Name</td><td>Type</td><td></td></tr>\n";

my($animalId, $animalName, $animalType);

while (@row = $sth->fetchrow_array) {
    $animalId = $row[0];
    $animalName = $row[1];
    $animalType = $row[3];

    print "<tr><td></td><td>$animalName</td><td>$animalType</td><td></td></tr>\n";
}

print "</table>\n";

print( end_html() );

私が好む方法は、javascript でこのハンドラーを呼び出し、ハンドラーに配列または json 内のすべての行を返すようにすることだと思います。それなら簡単です。データテーブルにデータをロードするだけです。

4

1 に答える 1