chalow で雑誌のオンライン書店「Fujisan.co.jp」のリンクを
簡単に貼るためのプラグイン。
久しぶりに使った。
だいぶ前に作ってたんだけど、そういえば公開してなかった。
### fujisan イメージ付きリンクの作成
# usage: {{fujisan('PID', 'STR')}}
sub fujisan {
my ($pid, $str) = @_;
my $prefix = "http://www.fujisan.co.jp/Product";
my $imageprefix = "http://www.fujisan.co.jp/images/products/";
my $suffix = "ap-sasakipochi"; # パートナーコード
$str =~ s/(\s|^)(\S+\.(jpg|jpeg|png|gif))/$1<img src="$2">/gi;
$str =~ s/$/<br>/gm;
$str =~ s/<br>\Z//m;
$image = "<img src=\"$imageprefix/$pid.jpg\">";
return qq(<a href="$prefix/$pid/$suffix">$image</a><a href="$prefix/$pid/$suffix">$str</a>);
}
関連)
Amazon プラグインの拡張、画像表示 --> [2005-03-30-4]