1 / 5

ネット商品の管理術

ネット商品の管理術. ファイル読み込みの活用. やりたいこと. 商品リストを別ファイルで管理. 入力フォーム (HTML) もプログラム (Perl) に書かせる. <FORM method="post" action=“receipt.cgi"> <P> <TABLE summary=" 一口シリーズ " border="1"> <TR><TH> 商品名 </TH><TH> 単価 ( 円 )</TH><TH> 注文数 </TH></TR> <TR> <TD> 亜衣のチョコ </TD> <TD>100</TD>

yuli-avery
Download Presentation

ネット商品の管理術

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. ネット商品の管理術 ファイル読み込みの活用

  2. やりたいこと 商品リストを別ファイルで管理 入力フォーム (HTML) もプログラム (Perl) に書かせる <FORM method="post" action=“receipt.cgi"> <P> <TABLE summary="一口シリーズ" border="1"> <TR><TH>商品名</TH><TH>単価(円)</TH><TH>注文数</TH></TR> <TR> <TD>亜衣のチョコ</TD> <TD>100</TD> <TD><INPUT type="text" name="0"></TD> </TR> ・・・(中略) ・・・ </TABLE> </P> <H2>支払い方法</H2> ・・・(中略) ・・・ </P> <P><INPUT type="submit" value="送信"></P> </FORM> 頻繁に変更 変更の度に HTML タグにするのが面倒(^^ゞ

  3. やりたいこと 商品リストを別ファイルで管理 入力フォーム (HTML) もプログラム (Perl) に書かせる name 属性 : 商品名 : 単価 <TR><TD>亜衣のチョコ</TD><TD>100</TD> <TD><INPUT type="text" name="0"></TD></TR> <TR><TD>一口亜衣ス</TD><TD>100</TD> <TD><INPUT type="text" name="1"></TD></TR> <TR><TD>亜衣カップ珈琲</TD><TD>100</TD> <TD><INPUT type="text" name="2"></TD></TR> <TR><TD>亜衣の飴ちゃん</TD><TD>100</TD> <TD><INPUT type="text" name="3"></TD></TR> <TR><TD>一粒苺</TD><TD>200</TD> <TD><INPUT type="text" name="4"></TD></TR> <TR><TD>一本バナナ</TD><TD>200</TD> <TD><INPUT type="text" name="5"></TD></TR> <TR><TD>一切れメロン</TD><TD>200</TD> <TD><INPUT type="text" name="6"></TD></TR> <TR><TD>一房みかん</TD><TD>200</TD> <TD><INPUT type="text" name="7"></TD></TR> <list.txt> 0:亜衣のチョコ:100 1:一口亜衣ス:100 2:亜衣カップ珈琲:100 3:亜衣の飴ちゃん:100 4:一粒苺:200 5:一本バナナ:200 6:一切れメロン:200 7:一房みかん:200 list.txt ファイルを開く open(LST,"list.txt"); @list = <LST>; close(LST); 仮置き場 LST に中身を置く 配列変数 @list に LST の中身を格納 LST に置いたファイル list.txt を閉じる @list 0:亜衣のチョコ:100 1:一口亜衣ス:100 ・・・ 7:一房みかん:200

  4. やりたいこと 商品リストを別ファイルで管理 入力フォーム (HTML) もプログラム (Perl) に書かせる @list 0:亜衣のチョコ:100 1:一口亜衣ス:100 ・・・ 7:一房みかん:200 1:一口亜衣ス:100 0:亜衣のチョコ:100 $x $tbl <TR><TD>亜衣のチョコ</TD><TD>100</TD> 1 0 100 100 一口亜衣ス 亜衣のチョコ <TD><INPUT type="text" name="0"></TD></TR> <TR><TD>一口亜衣ス</TD><TD>100</TD> $n $a $b <TD><INPUT type="text" name="1"></TD></TR> <TR><TD>亜衣カップ珈琲</TD><TD>100</TD> <TD><INPUT type="text" name="2"></TD></TR> <TR><TD>亜衣の飴ちゃん</TD><TD>100</TD> <TD><INPUT type="text" name="3"></TD></TR> <TR><TD>一粒苺</TD><TD>200</TD> <TD><INPUT type="text" name="4"></TD></TR> <TR><TD>一本バナナ</TD><TD>200</TD> <TD><INPUT type="text" name="5"></TD></TR> <TR><TD>一切れメロン</TD><TD>200</TD> <TD><INPUT type="text" name="6"></TD></TR> <TR><TD>一房みかん</TD><TD>200</TD> <TD><INPUT type="text" name="7"></TD></TR> $tbl = ””; foreach $x(@list){ } 改行コードを除去する chomp($x); ($n, $a, $b) = split(/:/,$x); $tbl .= "<TR><TD>$a</TD><TD>$b</TD>\n“; $tbl .= "<TD><INPUT type=\"text\" name=\"$n\"></TD></TR>\n“;

  5. やりたいこと 商品リストを別ファイルで管理 当然、計算処理もプログラム (Perl) にさせる @list 0:亜衣のチョコ:100 1:一口亜衣ス:100 ・・・ 7:一房みかん:200 $x @goods 0:亜衣のチョコ:100 亜衣のチョコ 一口亜衣ス ・・・ 一房みかん $n $a $b 0 1 7 亜衣のチョコ 0 100 @tanka 100 100 ・・・ 200 0 1 7 配列 @goods と @tanka を用意する $tbl = ""; foreach $x(@list){ chomp($x); ($n, $a, $b) = split(/:/,$x); } $goods[$n] = $a; $tanka[$n] = $b;

More Related