Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
$graph->add_edge( split m{ -> } ) for keys %edges;

print $graph->as_ascii();
  2. or download this
    Using Graph::Easy version 0.76
1 -> 2
...
          +---+                 |                           +---+     
+             |
          | 3 | ----------------+                           | 9 | ----
+-------------+
          +---+                                             +---+
  3. or download this
    ...
my $graph = Graph::Easy->new();
...
$graph->add_edge( 1, 2 );

print $graph->as_ascii();