Yet Another CPAN Grep

Graph-Dijkstra ( D/DD/DDALLEN/Graph-Dijkstra-0.70.tar.gz, DDALLEN, 2016; MetaCPAN )

Graph-Dijkstra/lib/Graph/Dijkstra.pm ( view source; MetaCPAN )

##########
#JSON Graph Specification file format methods                               #
#############################################################################
{ 
		
	use JSON;

	sub inp


		}
		
		my $json_text = $EMPTY_STRING;
		open(my $infile, '<:encoding(UTF-8)', $filename) or croak "could not open '$filename'";
		
		print  {$verboseOutfile} "inputGraphfromJSON: opened '$file

y $line = <$infile>) {
			$json_text .= $line;
		}
		close($infile);
	
		my $graphHref = from_json( $json_text, {utf8 => 1} ) or croak "inputGraphfromJSON: invalid json text";
		
		if (ref($gra