グラフ表示のためにGraphViz2をインストールする

グラフを見た方がわかりやすいので、そのためにCpanからGraphViz2をインストールする。

$ cpanm GraphViz2

Underlying Toolのgraphvizが入っていなくてError。yumでツールをインストール。

$ yum install graphviz

ツールがあれば問題なくインストールできた。

$ cpanm GraphViz2

perldocそのままですが、、下記で動作を確認。Looks good!

use GraphViz2;

my($graph) = GraphViz2 -> new
                (
                 edge   => {color => 'grey'},
                 global => {directed => 1},
                 graph  => {label => 'Adult', rankdir => 'TB'},
                 node   => {shape => 'oval'},
                );

$graph -> add_node(name => 'Carnegie', shape => 'circle');
$graph -> add_node(name => 'Murrumbeena', shape => 'box', color => 'green');
$graph -> add_node(name => 'Oakleigh',    color => 'blue');

$graph -> add_edge(from => 'Murrumbeena', to    => 'Carnegie', arrowsize => 2);
$graph -> add_edge(from => 'Murrumbeena', to    => 'Oakleigh', color => 'brown');

$graph -> run ( format => 'png', output_file => 'test.png');