Select Code to Download

# A single relation, useful for initial testing and debugging.
1-1        1-2

use diagnostics;
use strict;
...
             'label'    => $label
             );
} # make_vertex

package Vertex;
use strict;
...
} # set_label

1;

package Edge;
use strict;
...
} # query_verteces

1;