※このサンプルの解説は、「CGI(Perl)の解説」をすべて読み終えてる方を前提としています。

■ タブ区切りのデータを表組みにする

今回は「タブ区切りのデータ」の表組みですが、前回「カンマ区切りのデータ」の表組みを説明したので、変わる点といえば、データの分離方法だけです。
この処理を理解するには当然ですが、「HTML」の知識が必要になります。
解からない方は「HTMLの解説」で勉強してくださいね。

【 解    説 】

まず、タブ区切りのデータを用意しましょう。
とりあえず、次のようなデータを用意しました。
$flist[0] = "0001 John 35"; $flist[1] = "0002 Kate 26"; $flist[2] = "0003 George 18";

作成方法はほとんど「カンマ区切りのデータ表組み」と同じですが、文字列の分割が次のように変わるだけです。
@strbuf = split(/\t/, $strdat);

では、上記の内容を使用して「カンマ区切りのデータ」を表組みにしてみます。

【記述サンプル】
#!/usr/bin/perl $flist[0] = "0001,John,35"; $flist[1] = "0002,Kate,26"; $flist[2] = "0003,George,18"; print << "END_OF_DOC"; <table border='1'> <tr> <th>No.</th> <th>名前</th> <th>年齢</th> </tr> END_OF_DOC foreach $strdat (@flist){   print "<tr>\n";   @strbuf = split(/\t/, $strdat);   for $str0 (0..2){     print "<td>$strbuf[$str0]</td>\n";   }   print "</tr>\n"; } print "</table>\n";
◆実行結果について

上記のサンプルを「tbltab.cgi」という名前で保存して実行してみてください。

実行結果はこちらをクリックしてください。
なお、実行結果については、各々のサーバーの環境、ユーザーの環境にによって内容は変わってきます。


page update:2019/01/09 19:55

Copyright (c) 2000-2009, all Rights Reserved & Produced by atom