Help for this page

Select Code to Download


  1. or download this
    {v1 => $vertex1, v2 => $vertex2, rna => $rna, state => 1 }

...
}

# Output the edges of the graph with weights for each vertex
  2. or download this
    # traverse the graph using DFS 
my $t = Graph::Traversal::DFS->new($g);
my @v = $t->preorder;
print qq[Preorder:\n];
print qq[$_\t] foreach @v;
  3. or download this
    @v = $t->postorder;
print qq[Postorder:\n];
print qq[$_\t] foreach @v;
  4. or download this
    my @r = $t->roots;
print qq[Roots:\n];
print qq[$_\t] foreach @r;