[Perl]UMLシーケンス図の自動生成(UML::Sequence)

UMLのシーケンス図を出力してくれるというので試してみました。 http://search.cpan.org/~philcrow/UML-Sequence/ インストールした環境は以下のとおりです。 CentOS 4.3 Perl 5.8.5（CentOS 4.3のデフォルト） svgで出力するだけならGDが無くても大丈夫ですが、イメージにしたい場合はGDをインストールしておく必要があります。 まずこんなパッケージを作ってみます。 package Base; sub new { bless {}, shift } sub base_method { print "I am base\n"; shift->protected_method(); } package Foo; our @ISA = qw(Base); sub method_foo { print "method_foo cal