say "version: " . join(' ', Graph::igraph::version());
my $graph = Graph::igraph->new(directed => 1);
use Data::Dumper;
print Dumper($graph);
$graph->add_vertex('foobar');
say $graph->count_vertices;