没装 flashget/thunder/idm 之类的下载工具，然而作为收图狂时常还是需要批量下载， 于是用 perl 写了一个。只针对 cc98.org， 因为获取图片 URL 的方式很简单，98帖子正文中的图片都是可以点击在新窗口打开的， 所以匹配 <a href="blah"><img src="" /></a> 的 href 属性部分就行了。真正做事的代码是这个：

1
2

system "wget -c --output-file=wget.log --tries=5 --no-clobber --timeout=60 $domain$image"
      or warn "Command not found or file already exists.\n";

很囧吧？所以就不贴出来了。需要的话，私下交流吧。