File::FindとHTML::Parserを使ってみた。備忘のためのメモを。 File::Find 指定ディレクトリ配下を再帰的に探索して、発見したらコールバック関数を呼ぶ。 といったところ。 use File::Find; find(\&findFile, "/home/hoge"); sub findFile{ my $path; #ディ…