[天気:晴時々曇](広島県福山市) <睡眠:100--745><労働900--1740>
着々と寒くなってきているな。
しかし今日明日働けばまた休みというのはいいものだ。
ふにゅいっと働いて萎え。
午後の週報、エスタロンモカを服用してても
ないむね←
。
UMLの本をみて落書きしてみたり。
4
[Web][Blog][Books] @nifty Books アフィリエイト
なんか
ココログ
でオンライン書店2軒でのアフィリエイトが簡単にできるようになり、しかも
@nifty Books(bk1)
のは普通のココログでも審査無しでできるということなので、
ココログ通信の記事
を読んで
早速試してみた
。
ついでに
#!/usr/bin/perl
use strict;
use LWP;
use Jcode;
my $ua=new LWP::UserAgent;
my $rq=new HTTP::Request('GET', "http://ulara.tea-nifty.com/b/");
my $re=$ua->request($rq);
if (!$re->is_success || $re->content_type !~ m(text/html)i ){
die("Request Failed...orz\n");
}
my $flag=0;
foreach(split("\n", $re->content)){
if(m(<h2>Books</h2>)){
$flag=1;
next;
}
next unless $flag;
if( m{^<li><a href="(http://nifty\.bk1\.co\.jp/cgi-bin/srch/[^"]+)"><img alt="([^"]+)" src="(http://www\.bk1\.co\.jp/bookimages/[^"]+)" /></a><br />}){
my ($url,$alt,$img)=($1,$2,$3);
$alt=jcode($alt, 'utf8')->euc();
print "LIMG $url n $img $alt\n";
}elsif(m(^</ul>$)){
last;
}
}
というスクリプトで、hnfのLIMGディレクティブを吐かせて
とか。
朝食: りんごジャム付トースト、紅茶、無脂肪ヨーグルト
昼食: フライ盛り合わせ、もやしや青菜の塩茹で、他＠社食
夕食: 明星かけそばでっせ、綱一番ライトツナ、加ト吉冷凍たこ焼き、キムチ
間食: 夜にアカギ馬車道アイスクリン
以上、1 日分です。
うらゝのどす黒いエゴイスム日記＠ぷに★さくら版
![[hns2.1]](icons/hns-2.1-icon.png){kind=icon}
2004年11月04日(