サムネイルを表示するHTMLソースの出力
2000-04-30-2
ref. [2000-04-08-3]
% ls image/*.jpg
image/2000-04-29-15:03:21.jpg image/2000-04-29-15:04:24.jpg
image/2000-04-29-15:03:21.s.jpg image/2000-04-29-15:04:24.s.jpg
...
% ls image | perl -ne 'chomp; if(/s/){print "<img \
src=\"image/$_\"></a>\n"}else{print "<a href=\"image/$_\">"}; \
print "<br>\n" if($. % 8 == 0);'