LWP::UserAgentを使って、Flickrとか

Flickrの↓こういった個別ページから
screenshot
ブログに挿入するためのタグだけの状態↓

<a href='http://www.flickr.com/photos/urapico/1780738235/'><img src='http://farm3.static.flickr.com/2357/1780738235_2754bccf2d.jpg'></a>

を今まで手作業で作ってたんですが、面倒なんでPerlでLWP::UserAgentとか使って作りました。
非常に短いソースですが。。。

まだソースめちゃくちゃ汚いから、すこしきれいにして、後日自分の勉強のために公開したいと思います。