my $SSSP = $graph->SSSP_Dijkstra($start);
my %attrs = $graph->get_attributes($end);
my $path = $attrs{path};

die "No path found\n" if !defined $path;
print "Path: @$path\n";