HTTP::Messageのソースコードを読んでるときに, HTML::Parserが使われて いたので perldocを読んでサンプルコードを書いてみた。 イベントドリブンなツールなんで毛嫌いしていたところもありますけど、 そんなに難しくなかった。ただコンストラクタが若干あれかな。 イベントハンドラに関するパラメータが配列リファレンスで一つ目の 要素がコールバック関数で, 2番目の引数がコールバック関数の引数の 指定。キーと値で設定でも良いような気もしますが、まあこういうモジュール ということで使いましょう。 以下はコマンドライン引数で指定した urlとパターンからマッチするリンクを 抽出するものです。 #!/usr/bin/perl use strict; use warnings; use LWP::Simple; use HTML::Parser; die "usage ./htm