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

        my $graph = $parser->from_text(
'[ 0 ] -> [ 1 ]'.
'[ 1 ] -> [ 202 ]'.
'[ 1 ] -> [ 300 ]'.
'[ 1 ] -> [ 344 ]'.
'[ 2 ] -> [ 3 ]'.
'[ 3 ] -> [ 4 ]'.
'[ 4 ] -> [ 202 ]'.
'[ 4 ] -> [ 345 ]'.
'[ 4 ] -> [ 5 ]'.
'[ 4 ] -> [ 6 ]'.
'[ 5 ] -> [ 440 ]'.
'[ 5 ] -> [ 500 ]'.
'[ 5 ] -> [ 505 ]'.
'[ 5 ] -> [ 508 ]'.
'[ 5 ] -> [ 6 ]'.
'[ 6 ] -> [ 201 ]'.
'[ 6 ] -> [ 503 ]'.
'[ 6 ] -> [ 507 ]'.
'[ 6 ] -> [ 7 ]'.
'[ 7 ] -> [ 2 ]'.
'[ 7 ] -> [ 200 ]'.
'[ 7 ] -> [ 503 ]'.
'[ 7 ] -> [ 507 ]'.
'[ 200 ] -> [ 202 ]'.
'[ 202 ] -> [ 2 ]'.
'[ 202 ] -> [ 201 ]'.
'[ 300 ] -> [ 2 ]'.
'[ 300 ] -> [ 202 ]'.
'[ 300 ] -> [ 344 ]'.
'[ 300 ] -> [ 502 ]'.
'[ 300 ] -> [ 506 ]'.
'[ 344 ] -> [ 300 ]'.
'[ 345 ] -> [ 4 ]'.
'[ 440 ] -> [ 5 ]'.
'[ 500 ] -> [ 5 ]'.
'[ 502 ] -> [ 300 ]'.
'[ 503 ] -> [ 6 ]'.
'[ 505 ] -> [ 5 ]'.
'[ 506 ] -> [ 300 ]'.
'[ 507 ] -> [ 6 ]'.         
'[ 508 ] -> [ 6 ]'.
'[ 507 ] -> [ 7 ]'.
'[ 503 ] -> [ 7 ]'
);                         
print $graph->as_ascii();