libxml2 を C でいじっていたんですけど,あれこれ書いていくのが面倒になったので,とりあえず Perl でプロトタイプを書くことにしました。 つうことで,Perl から XML::LibXML を使ってみました。前回と同じく SAX インタフェースです。普通の用途では使わないです。 はじめのいっぽ use strict; use warnings; package MySAXHandler; use base qw( XML::SAX::Base ); sub start_element { my ($self, $el) = @_; printf "<%s>\n", $el->{Name}; } package main; my $parser = do { use XML::LibXML::SAX; XML::LibXML::SAX->new(); }; my $source