#!/usr/bin/perl

##############メガチャレンジスクリプトの利用条件
#メガチャレンジは株式会社CNMの著作であり商品です。
#スクリプトの一部または全部を無断で転用転載することは認めておりません。
##############

sub item_pre {

    # 変更不可
        if($i_data=~/<itemName>(.+)<\/itemName>/)         {$itemname=$1;}
        if($i_data=~/<itemPrice>(.+)<\/itemPrice>/)       {$itemprice = $1;}
        if($i_data=~/<itemCaption>(.+)<\/itemCaption>/)       {$itemcaption = $1;}
        if($i_data=~/<itemUrl>(.+)<\/itemUrl>/)           {$itemurl = $1;}
        if($i_data=~/<affiliateUrl>(.+)<\/affiliateUrl>/) {$affiliateurl = $1;}
        if($i_data=~/<smallImageUrl>(.+)<\/smallImageUrl>/){$smallimageurl = $1;}
        if($i_data=~/<mediumImageUrl>(.+)<\/mediumImageUrl>/){$mediumImageUrl = $1;}
        if($i_data=~/<shopName>(.+)<\/shopName>/)         {$shopname =$1;}
        if($i_data=~/<shopUrl>(.+)<\/shopUrl>/)           {$shopurl =$1;} 
        if($i_data=~/<itemCode>(.+)<\/itemCode>/)           {$itemCode =$1;} 
    # 変更不可

#ここからHTML表示
print "Content-type: text/html; charset=UTF-8\n\n";
print <<"EOF";
<html lang="ja">
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>$p_title - $itemname</title>
<meta name="description" content="$p_desc">
<meta name="keywords" content="$p_key">
</head>
<body bgcolor="#ffffff" TEXT="#333333" LINK="#3333cc">

<p>$p_title<br>
$p_header</p>
<font size="2">
<hr>

<A href="$affiliateurl"><IMG src="$smallimageurl" border="0"></A>
<p><FONT size="2">$itemname</FONT></p>
<BR>
<FONT size="2">$itemcaption</FONT><BR>
<BR>
<font size="2">$itemprice 円<br>$shopname</font><BR>
<BR>
<B><A href="$affiliateurl" target="_blank">商品のお申込はこちら</A></B><BR>
<hr>

<!--携帯個別ページ　検索フォーム-->
<form action="./" method="post">
<input type="hidden" name="mode" value="s">
<font size="2">商品を検索できます。<br>
ジャンル：<select name="genreId">
<option value="0"$gen0>すべての商品</option>
<option value="101240"$gen1>CD・DVD・楽器</option>
<option value="100804"$gen2>インテリア・寝具</option>
<option value="101164"$gen3>おもちゃ・ホビー・ゲーム</option>
<option value="100533"$gen4>キッズ・ベビー・マタニティ</option>
<option value="215783"$gen5>キッチン・日用品雑貨・文具</option>
<option value="216129"$gen6>ジュエリー・腕時計</option>
<option value="101070"$gen7>スポーツ・アウトドア</option>
<option value="100938"$gen8>ダイエット・健康・介護</option>
<option value="100316"$gen9>ドリンク・お酒</option>
<option value="100026"$gen10>パソコン・周辺機器</option>
<option value="216131"$gen11>バッグ・小物・ブランド雑貨</option>
<option value="100371"$gen12>ファッション・アパレル・靴</option>
<option value="100005"$gen13>花・園芸・エクステリア</option>
<option value="101213"$gen14>ペット・ペットグッズ</option>
<option value="211742"$gen15>家電・AV・カメラ</option>
<option value="101114"$gen16>車・バイク</option>
<option value="100227"$gen17>食品・スイーツ</option>
<option value="100939"$gen18>美容・コスメ・香水</option>
<option value="200162"$gen19>本・雑誌・コミック</option>
<option value="101381"$gen20>旅行・出張・チケット</option>
<option value="200163"$gen21>不動産・住まい</option>
<option value="101438"$gen22>サービス</option>
<option value="402853"$gen23>デジタルコンテンツ</option>
<option value="503190"$gen24>車用品・バイク用品</option>
</select><br>
キーワード <input type="text" name="keyword" value="$keyword" size="15"><br>
<input type="submit" value=" 検索 "></font></form>
<!--検索フォーム-->
<hr>

<p>$p_footer</p>
<hr>

<p>
<font size="2"><a href="$ENV{'HTTP_REFERER'}">前ページに戻る</a></font>
</p>
<hr>


<p>
<!-- Rakuten Web Services Attribution Snippet FROM HERE -->
<A href="http://webservice.rakuten.co.jp/" target="_blank"><IMG src="http://webservice.rakuten.co.jp/img/credit/200709/credit_4936.gif" border="0" alt="楽天ウェブサービスセンター" title="楽天ウェブサービスセンター" width="49" height="36"></A>
<!-- Rakuten Web Services Attribution Snippet TO HERE -->
</p>


</BODY>
</HTML>
EOF

}

1;
