Help for this page
my %Professor; my %Dwight; ... 'boss' => \%Professor ); my %Dwight = ( ... );
graph AGRAPH { Professor -- Hermes Professor -- Amy ... Hermes -- Cubert ... }