in reply to Using Perl Graphs (Data Structure) and SPT_Dijkstra Routine
$sptg = $g->SPT_Dijkstra($root) [download]