Devel::Graph module can turn Perl code into a graphical flowchart.
SYNOPSIS
use Devel::Graph;
my $grapher = Devel::Graph->new();
my $graph = $grapher->decompose( 'if ($b == 1) { $a = 9; }' );
print $graph->as_ascii();
# Will result in something like this:
################
# start #
################
|
|
v
+--------------+
| if ($b == 1) |--+
+--------------+ |
| |
| true |
v |
+--------------+ |
| $a = 9; | | false
+--------------+ |
| |
| |
v |
################ |
# end # decompose( 'lib/Foo.pm' );
print $graph_2->as_ascii();
This module decomposes Perl code into blocks and generates a Graph::Flowchart object out of these. The resulting object represents the code in a flowchart manner and it can return an Graph::Easy object.
This in turn can be converted it into all output formats currently supported by Graph::Easy, namely HTML, SVG, ASCII art, Unicode art, graphviz code (which then can be rendered as PNG etc) etc.
Product's homepage
Requirements:
· Perl