Select Code to Download

use Graph::Easy::Parser;
        my $parser = Graph::Easy::Parser->new();

...
'[ 503 ] -> [ 7 ]'
);                         
print $graph->as_ascii();

#!/usr/bin/perl

use Graph::Easy::Parser;
...
"[ 6 ] -> [ 201 ]"
);                         
print $graph->as_ascii();