NAME
FAST - Library for Flowchart Abstract Syntax Tree
SYNOPSIS
use FAST;
$src = <<'.';
entry => <p>
<p> => [c]
[c] => <q>
<p> => [a]
<q> => <p>
<q> => exit
[a] => [b]
[b] => exit
.
# Load from string:
$g = FAST->new(\$src) or
die FAST->error;
# Load from disk file:
$g = FAST->new('foo.in') or
die FAST->error;
# Generate PNG image:
$g->as_png('blah.png');
# Or return the image data directly:
$bin_data = $g->as_png;
# Generate pseud assembly code dipicting the flowchart:
$g->as_asm('blah.asm');
# Or return the ASM code directly:
$asm_src = $g->as_asm;
DESCRIPTION
CODE COVERAGE
I use Devel::Cover to test the code coverage of my tests, below is the Devel::Cover report on this module's test suite (version 0.01 rev 317):
---------------------------- ------ ------ ------ ------ ------ ------ ------
File stmt bran cond sub pod time total
---------------------------- ------ ------ ------ ------ ------ ------ ------
blib/lib/FAST.pm 97.6 91.1 90.0 100.0 0.0 34.2 93.5
blib/lib/FAST/Element.pm 100.0 n/a 33.3 100.0 0.0 18.4 88.7
blib/lib/FAST/Node.pm 100.0 100.0 100.0 100.0 0.0 18.4 87.1
blib/lib/FAST/Struct.pm 100.0 100.0 100.0 100.0 0.0 2.6 95.2
blib/lib/FAST/Struct/If.pm 100.0 75.0 100.0 100.0 0.0 18.4 86.9
blib/lib/FAST/Struct/Seq.pm 98.1 83.3 77.8 100.0 0.0 7.9 84.7
.../lib/FAST/Struct/While.pm 100.0 50.0 100.0 100.0 0.0 0.0 84.9
Total 98.5 90.4 86.7 100.0 0.0 100.0 90.6
---------------------------- ------ ------ ------ ------ ------ ------ ------
AUTHOR
Agent Zhang mailto:agentzh@gmail.com
COPYRIGHT
Copyright (c) 2006 Agent Zhang
This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.