use Graph::Simple;
my $graph = Graph::Simple->new();
my $bonn = Graph::Simple::Node->new(
name => 'Bonn',
);
my $berlin = Graph::Simple::Node->new(
name => 'Berlin',
);
$graph->add_edge ($bonn, $berlin);
$graph->layout();
print $graph->as_ascii( );
# prints:
# +------+ +--------+
# | Bonn | --> | Berlin |
# +------+ +--------+
Graph::Simple::Layout::Scout contains just the actual path-managing code for
Graph::Simple, e.g. to create/destroy/maintain paths, node
placement etc.
Exports nothing.
This module injects the following methods into Graph::Simple:
$graph->_path_is_clear($path);
For all points (x,y pairs) in the path, check that the cell is still free.
$path points to a list x,y,type pairs as in [ [x,y,type], [x,y,type], ...].
Copyright (C) 2004 - 2005 by Tels http://bloodgate.com.
See the LICENSE file for information.