2005-06-11 ■ メモ OC 22:00〜25:00 手作業でやろうかと思っていたけど、めんどくなった*1ので、置換でごーっと。 こんな感じ。 perl -pi.bak \ -e 's/(<a.*?mailto:.*?>)/<!--$1-->/g;' \ -e 's/(<a.*?\.zip"*?>)/<!--$1-->/g;' \ data/photo/*.html *1:と、訂正漏れがありそう