Select Code to Download

package Graph::igraph;

...
}

1;

say "version: " . join(' ', Graph::igraph::version()); # prints 0.7.1 
+0 7 1

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

version: 0.7.1 0 7 1
directed -- 0
...
Attempt to free unreferenced scalar: SV 0x21213d8 at /home/fgabolde/pe
+rl5/perlbrew/perls/perl-5.18.4/lib/site_perl/5.18.4/x86_64-linux/FFI/
+Platypus.pm line 331.
$VAR1 = bless( do{\(my $o = undef)}, 'Graph::igraph' );
*** Error in `perl': realloc(): invalid next size: 0x000000000223f850 
+***