語句ログ - ニュース、プログラミング、システムトレードの用語解説

[Perl][HTML::Template]タグのサンプルプログラム

Thu, 22 Jul 2010 17:36:36 +0900

<TMPL_LOOP>タグはセクションを区切り、名前をつけることができます。この名前つきループの内側に<TMPL_VAR>タグを置き、プログラムでパラメータに代入するハッシュ・リファレンスの param() にリスト(配列リファレンス)を渡すと、リスト分の出力が繰り返されます。

以下は、<TMPL_LOOP>タグの使い方を示すサンプルプログラムです。サンプルプログラムでは、コンマで区切られたデータファイルを読み込んでリストを作成し、それをパラメータに渡してテーブルを表示しています。また、<TMPL_IF>タグ、<TMPL_ELSE>タグを使用してデータがない場合は、テーブルが出力されないようにしています。

--- データファイル（userdata.txt）

kagahiro,kitaakita,kagahiro3@59log.com,011678901admin,tokyo,webmaster10@59log.com,011778901buzei,kawasaki,support2@59bbs.org,041758901

--- テンプレートファイル（tmplloop.tmpl）

<html><head><title>HTML::Templateのサンプルプログラム LOOP</title></head><body><h1>HTML::Templateのサンプルプログラム LOOP</h1><TMPL_IF NAME=DATA_NUM>    <table>    <tr>    <td>User Name</td>    <td>Address</td>    <td>Email</td>    <td>Tel</td>    </tr>    <TMPL_LOOP NAME=USER_INFO>    <tr>    <td><TMPL_VAR NAME=USERNAME></td>    <td><TMPL_VAR NAME=ADDRESS></td>    <td><TMPL_VAR NAME=EMAIL></td>    <td><TMPL_VAR NAME=TEL></td>    </tr>    </TMPL_LOOP>    </table><TMPL_ELSE>    No data</TMPL_IF></body></html>

--- CGI（tmplloop.cgi）

#!/usr/bin/perluse strict;use warnings;use HTML::Template;my $template = HTML::Template->new(filename => 'tmplloop.tmpl');my @loop_data = ();open my $infh, '<', "userdata.txt";while (my $rec = <$infh>) {    chomp $rec;    if ($rec ne '') {        my %row_data;        my ($username, $address, $email, $tel) = split(/,/, $rec);        $row_data{USERNAME} = $username;        $row_data{ADDRESS} = $address;        $row_data{EMAIL} = $email;        $row_data{TEL} = $tel;        push @loop_data, \%row_data;    }}close $infh;$template->param(USER_INFO => \@loop_data);$template->param(DATA_NUM => scalar(@loop_data));print "Content-Type: text/html; charset=utf-8\n\n";print $template->output;

Link(4) | Trackback(0) | Comment(0)

キーワード

Perl HTML Template サンプルプログラム

語句ログ - ニュース、プログラミング、システムトレードの用語解説 - 日本の注目ニュース、コンピュータープログラミング（C/C++,Perl,PHP,SQL）、システムトレード（FX,CFD,株価指数,先物）に関する語句（Word）を日本語や英語で解説

[Perl][HTML::Template]タグのサンプルプログラム

Thu, 22 Jul 2010 13:20:16 +0900

HTML::Templateの<TMPL_VAR>タグは、プログラムでパラメータに値を設定すると、タグの部分がパラメータで設定された文字列で置き換えられるという簡単なものです。

以下は、<TMPL_VAR>タグの使い方を示す単純なサンプルプログラムです。

--- テンプレートファイル（tmplvar.tmpl）

<html><head><title>HTML::Templateのサンプルプログラム VAR</title></head><body><h1>HTML::Templateのサンプルプログラム VAR</h1><p>My Name is <TMPL_VAR NAME=NAME> <br />My IP Address is <TMPL_VAR NAME=IPADDR> <br /></p></body></html>

--- CGI（tmplvar.cgi）

#!/usr/bin/perluse strict;use warnings;use HTML::Template;my $template = HTML::Template->new(filename => 'tmplvar.tmpl');$template->param(NAME => 'Yamato, Taro');$template->param(IPADDR => $ENV{'REMOTE_ADDR'});print "Content-Type: text/html; charset=utf-8\n\n";print $template->output;

Link(3) | Trackback(0) | Comment(0)

キーワード

Perl HTML Template サンプルプログラム

Freebase

Thu, 22 Jul 2010 00:08:47 +0900

Freebaseは、映画、本、TV番組、セレブ、企業など1200万以上のエントリを含む大規模な情報データベース。誰もが貢献・共有できるオープンな共有型知識データベースで、開発者はFree APIを利用して、Freebaseの構造データを自分のアプリケーションやサービスに統合できる。

Freebase is an open, Creative Commons licensed repository of structured data of more than 12 million entities.
An entity is a single person, place, or thing. Freebase connects entities together as a graph.

Freebase

Link(1) | Trackback(1) | Comment(0)

キーワード

情報 データベース オープン Google API

IPA、Webサービスの相互運用性に関するJIS規格を公示

Thu, 22 Jul 2010 00:05:13 +0900

IPA（情報処理推進機構）オープンソフトウェア・センターが中心となって原案作成を進めてきたWebサービスの相互運用性に関するJIS規格（JIS X 7361、JIS X 7362、JIS X 7363）が公示された。これらのJIS規格を活用することにより、相互運用性の高いWebサービスを構築することが可能になる。

公示されたJIS規格は、Webサービス技術を推進する国際的な業界団体であるWS-Iが、2008年に制定したISO/IEC 29361:2008、ISO/IEC 29362:2008及びISO/IEC 29363:2008の三つの国際規格を、国内のITベンダー及び国内のユーザーからもより容易に、広く活用されることを目指し、IPAが日本語への翻訳を行うとともに、JIS規格とするための作業に取り組んできたもの。

情報処理推進機構：プレス発表：記事：Webサービス相互運用性関連JIS規格の公示について

Link(2) | Trackback(0) | Comment(0)

キーワード

IPA Webサービス JIS 規格