それで、フォーマットを作って、それに沿って書くようにすればいいのではないかと思い、項目を考えてみました。
1. その本を手にとって読んでみた理由は?
2. その本の概要は?(どのような本か?)
3. その本を読んで印象に残ったところは?
4. 他の人におすすめのポイントは?
この4つの質問に答えていくようにすれば、ブログの記事が1本書けそうです。
#!/usr/bin/perl -T use strict; use warnings; use LWP::Simple; my $AID = "(アフィリエイトID)"; my $DID = "(デベロッパーID)"; my $qs = $ENV{QUERY_STRING} || ""; my ($asin) = $qs =~ /^(4[0-9]{8}[0-9X])$/; $asin ||= ""; my $ua = $ENV{'HTTP_USER_AGENT'} || ""; my $url = "http://api.rakuten.co.jp/rws/3.0/rest?" ."developerId=$DID&affiliateId=$AID&" ."operation=BooksBookSearch&" ."version=2010-03-18&isbn=$asin"; my $cont = $asin ? (get($url) || "") : ""; if ($cont =~ /<affiliateUrl>(.+?)</) { my $aurl = $1; print "Location: $aurl\n\n"; } else { print "Content-Type: text/html\n\nNOT FOUND!\n"; }
http://asin.ta2o.net/asin2rkbk.cgi?4105393057
http://asin.ta2o.net/rkbk/4105393057
.htaccess : RewriteRule ^rkbk/([A-Z0-9]+) /asin2rkbk.cgi?$1 [L]